home *** CD-ROM | disk | FTP | other *** search
- object KeyPropForm: TKeyPropForm
- Tag = 4
- Left = 238
- Top = 246
- Width = 502
- Height = 555
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- Caption = 'Key Properties'
- Color = clBtnFace
- DragKind = dkDock
- DragMode = dmAutomatic
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- HelpFile = 'help\rr.htm'
- OldCreateOrder = True
- Position = poDefault
- PrintScale = poPrintToFit
- OnActivate = FormActivate
- OnCanResize = FormCanResize
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnKeyDown = FormKeyDown
- PixelsPerInch = 96
- TextHeight = 13
- object CoolbarProperty: TCoolBar
- Left = 0
- Top = 0
- Width = 494
- Height = 416
- AutoSize = True
- Bands = <
- item
- Control = PanelGeneral
- ImageIndex = -1
- MinHeight = 120
- Width = 494
- end
- item
- Control = PanelNT
- ImageIndex = -1
- MinHeight = 120
- Width = 494
- end
- item
- Control = PanelStats
- ImageIndex = -1
- MinHeight = 140
- Width = 494
- end
- item
- Control = ToolBar1
- ImageIndex = -1
- MinHeight = 30
- Width = 494
- end>
- EdgeInner = esNone
- EdgeOuter = esNone
- OnMouseUp = CoolbarPropertyMouseUp
- OnResize = CoolbarPropertyResize
- object PanelNT: TPanel
- Left = 9
- Top = 122
- Width = 481
- Height = 120
- BevelOuter = bvNone
- BorderWidth = 8
- TabOrder = 1
- DesignSize = (
- 481
- 120)
- object Label2: TLabel
- Left = 8
- Top = 12
- Width = 54
- Height = 13
- Caption = 'Classname:'
- end
- object Label7: TLabel
- Left = 8
- Top = 36
- Width = 70
- Height = 13
- Caption = 'Last write time:'
- end
- object Label3: TLabel
- Left = 8
- Top = 60
- Width = 34
- Height = 13
- Caption = 'Owner:'
- end
- object Label8: TLabel
- Left = 8
- Top = 84
- Width = 41
- Height = 13
- Caption = 'Security:'
- end
- object ButtonPermissions: TBitBtn
- Left = 92
- Top = 80
- Width = 108
- Height = 22
- Caption = 'Permissions...'
- TabOrder = 3
- OnClick = ButtonPermissionsClick
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000130B0000130B000000000000000000004040FF4040FF
- 4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040
- FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF737B734040FF40
- 40FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF
- 4040FF4040FF737B73B5BDB5737B734040FF4040FF4040FF4040FF4040FF4040
- FF4040FF4040FF4040FF4040FF4040FF4040FFB5BDB5F7FFF7D6DED6737B7340
- 40FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF
- 4040FF737B73F7FFF7B5BDB5737B734040FF4040FF4040FF4040FF4040FF4040
- FF737B73737B734040FF4040FF4040FF4040FF4040FF737B73D6DED6737B7340
- 40FF4040FF4040FF4040FF737B73737B7373FFF7737B734040FF4040FF4040FF
- 4040FFB5BDB5F7FFF7B5BDB5737B734040FF4040FF4040FF737B7373BDB573FF
- F7737B73737B734040FF4040FF4040FF4040FF737B73F7FFF7D6DED6737B7340
- 40FF4040FF4040FF737B7373FFF7737B73737B734040FF4040FF4040FF4040FF
- 4040FF4040FF737B73B5BDB5737B734040FF737B73737B7373FFF7737B73737B
- 734040FF4040FF4040FF4040FF4040FF4040FF737B73F7FFF7737B73737B7373
- 7B7373FFF773FFF7737B73737B734040FF4040FF4040FF4040FF4040FF4040FF
- 737B73F7FFF7737B7373BDB573FFF7D6DED673FFF7737B73737B734040FF4040
- FF4040FF4040FF4040FF4040FF737B73F7FFF7737B7373BDB573FFF7737B7373
- FFF7D6DED673FFF7737B734040FF4040FF4040FF4040FF4040FF4040FF737B73
- D6DED6737B7373FFF7737B73737B73737B7373FFF7B5BDB54040FF4040FF4040
- FF4040FF4040FF4040FF4040FF737B73F7FFF7737B7373BDB5737B73737B7373
- FFF7D6DED6737B734040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF
- 737B73F7FFF7737B73737B7373FFF7D6DED6737B734040FF4040FF4040FF4040
- FF4040FF4040FF4040FF4040FF4040FF4040FF737B73737B73737B73737B7373
- 7B734040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF}
- end
- object ButtonAuditing: TBitBtn
- Left = 200
- Top = 80
- Width = 108
- Height = 22
- Caption = 'Auditing...'
- TabOrder = 4
- OnClick = ButtonAuditingClick
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000130B0000130B000000000000000000004040FF4040FF
- 3110003110003110003110003110003110003110003110003110003110003110
- 003110003110004040FF4040FF735242B5948494736331520094736394736394
- 7363947363947363731000B59400B510009473637352423110004040FF735242
- B59484947363E7F7E7947363947363947363947363731000B59400B51000B510
- 009473637352427352424040FF735242B5948494736394736394736394736394
- 7363731000B59400B51000B510009473639473637352427352424040FF735242
- B59484B59484B59484B59484B59484731000B59400B51000B51000B59484B594
- 84B594847352427352424040FF4040FF31100073524231100031100073524294
- 7363B51000B510003110003110003110003110009473637352424040FF4040FF
- 735242947363B594009473633110007352427352429473639473639473639473
- 637352423110007352424040FF735242B59484B59400947363B5940094736331
- 10007310007310007310007310009473637352427352423110004040FF735242
- B59400B59484B59400947363B59400311000B51000B51000B510007310009473
- 637352427352423110004040FF735242B59484B59400947363B5940094736331
- 1000B51000B51000B510007310009473637352427352423110004040FF4040FF
- 735242B59484B59400B59484311000B51000B51000B51000B510007310009473
- 637352427352423110004040FF4040FF73524273524273524231100031100031
- 10003110003110003110007310009473637352427352423110004040FF4040FF
- 735242B594849473639473639473639473639473639473639473639473639473
- 637352427352423110004040FF4040FF735242B59484B59484B59484B59484B5
- 9484B59484B59484B59484B59484B594847352427352423110004040FF4040FF
- 4040FF7352429473639473639473639473639473639473639473639473639473
- 63B594847352423110004040FF4040FF4040FF4040FF73524273524273524273
- 52427352427352427352427352427352427352427352424040FF}
- end
- object ButtonTakeOwnership: TBitBtn
- Left = 308
- Top = 80
- Width = 108
- Height = 22
- Caption = 'Take &Ownership'
- TabOrder = 5
- OnClick = ButtonTakeOwnershipClick
- Glyph.Data = {
- 36030000424D3603000000000000360000002800000010000000100000000100
- 18000000000000030000130B0000130B000000000000000000004040FF4040FF
- 4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040
- FF4040FF4040FF4040FF4040FF4040FF4040FF84000084000084000084000084
- 00008400008400008400008400004040FF4040FF4040FF4040FF4040FF4040FF
- 840000FF0000FF0000840000840000840000C6C6C6840000FF00008400008400
- 004040FF4040FF4040FF4040FF4040FF4040FF840000840000C6C6C6C6C6C6FF
- FFFFC6C6C68484848400008400004040FF4040FF4040FF4040FF4040FF4040FF
- 4040FF4040FF000000848484FFFFFFFFFFFF8484840000008400004040FF4040
- FF4040FF4040FF4040FF4040FF4040FF4040FF000000000000000000FFFFFFC6
- C6C6C6C6C6C6C6C6C6C6C60000004040FF4040FF4040FF4040FF4040FF4040FF
- 4040FF000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFF0000004040
- FF4040FF4040FF4040FF4040FF4040FF000000000000000000000000848484FF
- FFFFFFFFFFFFFFFFC6C6C60000004040FF4040FF4040FF4040FF4040FF4040FF
- 000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC6C6C60000
- 004040FF4040FF4040FF4040FF4040FF000000000000000000000000848484FF
- FFFFFFFFFFC6C6C6FF0000C6C6C60000004040FF4040FF4040FF4040FF4040FF
- 000000000000000000000000000000000000C6C6C6FFFFFF8484840000004040
- FF4040FF4040FF4040FF4040FF4040FF00000000000000000000000000000000
- 0000000000FFFFFFFFFFFFC6C6C60000004040FF4040FF4040FF4040FF4040FF
- 4040FF0000000000000000000000000000000000000000000000000000000000
- 004040FF4040FF4040FF4040FF4040FF4040FF4040FF00000000000000000000
- 00000000000000000000000000000000004040FF4040FF4040FF4040FF4040FF
- 4040FF4040FF4040FF0000000000000000000000000000000000000000004040
- FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF40
- 40FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF4040FF}
- end
- object EditOwner: TEdit
- Left = 92
- Top = 56
- Width = 388
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 2
- OnEnter = EditLastWriteTimeEnter
- end
- object EditLastWriteTime: TEdit
- Left = 92
- Top = 32
- Width = 388
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 1
- OnEnter = EditLastWriteTimeEnter
- end
- object EditClassName: TEdit
- Left = 92
- Top = 8
- Width = 388
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 0
- OnEnter = EditLastWriteTimeEnter
- end
- end
- object PanelGeneral: TPanel
- Left = 9
- Top = 0
- Width = 481
- Height = 120
- BevelOuter = bvNone
- BorderWidth = 8
- TabOrder = 0
- DesignSize = (
- 481
- 120)
- object Label1: TLabel
- Left = 8
- Top = 12
- Width = 47
- Height = 13
- Caption = 'Keyname:'
- end
- object Label10: TLabel
- Left = 8
- Top = 36
- Width = 48
- Height = 13
- Caption = 'Computer:'
- end
- object Label9: TLabel
- Left = 8
- Top = 60
- Width = 56
- Height = 13
- Caption = 'Description:'
- end
- object Label4: TLabel
- Left = 8
- Top = 84
- Width = 45
- Height = 13
- Caption = 'Category:'
- end
- object EditCategory: TEdit
- Left = 93
- Top = 80
- Width = 388
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 3
- OnEnter = EditLastWriteTimeEnter
- end
- object EditDescription: TEdit
- Left = 93
- Top = 56
- Width = 388
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 2
- OnEnter = EditLastWriteTimeEnter
- end
- object EditComputer: TEdit
- Left = 93
- Top = 32
- Width = 388
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 1
- end
- object EditKeyname: TEdit
- Left = 93
- Top = 8
- Width = 388
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 0
- OnKeyDown = EditKeynameKeyDown
- end
- end
- object PanelStats: TPanel
- Left = 9
- Top = 244
- Width = 481
- Height = 140
- BevelOuter = bvNone
- BorderWidth = 8
- TabOrder = 2
- DesignSize = (
- 481
- 140)
- object Label11: TLabel
- Left = 8
- Top = 28
- Width = 44
- Height = 13
- Caption = 'Subkeys:'
- end
- object Label12: TLabel
- Left = 8
- Top = 52
- Width = 35
- Height = 13
- Caption = 'Values:'
- end
- object Label15: TLabel
- Left = 8
- Top = 76
- Width = 67
- Height = 13
- Caption = 'Largest value:'
- end
- object Label17: TLabel
- Left = 8
- Top = 100
- Width = 74
- Height = 13
- Caption = 'Bytes in values:'
- end
- object Label16: TLabel
- Left = 93
- Top = 8
- Width = 73
- Height = 13
- Caption = 'In this key only:'
- end
- object Label14: TLabel
- Left = 240
- Top = 8
- Width = 101
- Height = 13
- Caption = 'Including all subkeys:'
- end
- object EditTotalSubkeys: TEdit
- Left = 240
- Top = 24
- Width = 240
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 1
- end
- object EditTotalValues: TEdit
- Left = 240
- Top = 48
- Width = 240
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 3
- end
- object EditTotalLargestSize: TEdit
- Left = 240
- Top = 72
- Width = 240
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 5
- end
- object EditTotalSize: TEdit
- Left = 240
- Top = 96
- Width = 240
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- ReadOnly = True
- TabOrder = 7
- end
- object EditDirectLargestSize: TEdit
- Left = 93
- Top = 72
- Width = 132
- Height = 21
- ReadOnly = True
- TabOrder = 4
- end
- object EditDirectSize: TEdit
- Left = 93
- Top = 96
- Width = 132
- Height = 21
- ReadOnly = True
- TabOrder = 6
- end
- object EditDirectValues: TEdit
- Left = 93
- Top = 48
- Width = 132
- Height = 21
- ReadOnly = True
- TabOrder = 2
- end
- object EditDirectSubkeys: TEdit
- Left = 93
- Top = 24
- Width = 132
- Height = 21
- ReadOnly = True
- TabOrder = 0
- end
- end
- object ToolBar1: TToolBar
- Tag = 2
- Left = 9
- Top = 386
- Width = 481
- Height = 30
- Align = alNone
- ButtonHeight = 30
- ButtonWidth = 31
- Caption = 'ToolBarButtons'
- DisabledImages = MainForm.ImageListToolbarDisabled
- EdgeBorders = []
- EdgeInner = esNone
- EdgeOuter = esNone
- Flat = True
- HotImages = MainForm.ImageListSaturated
- Images = MainForm.ImageListToolbar
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- Transparent = True
- Wrapable = False
- object ButtonOk: TSpeedButton
- Left = 0
- Top = 0
- Width = 61
- Height = 30
- Caption = 'Ok'
- Flat = True
- Transparent = False
- OnClick = ButtonOkClick
- end
- object ToolButton1: TToolButton
- Left = 61
- Top = 0
- Width = 8
- Caption = 'ToolButton1'
- ImageIndex = 7
- Style = tbsSeparator
- end
- object ButtonCancel: TSpeedButton
- Left = 69
- Top = 0
- Width = 64
- Height = 30
- Caption = 'Cancel'
- Flat = True
- Transparent = False
- OnClick = ButtonCancelClick
- end
- object ToolButton3: TToolButton
- Left = 133
- Top = 0
- Width = 8
- Caption = 'ToolButton3'
- ImageIndex = 7
- Style = tbsSeparator
- end
- object ButtonStayOnTop: TToolButton
- Left = 141
- Top = 0
- Hint = 'Stay on top'
- Caption = 'ButtonStayOnTop'
- Down = True
- ImageIndex = 16
- Style = tbsCheck
- OnClick = ButtonStayOnTopClick
- end
- object ToolButton2: TToolButton
- Left = 172
- Top = 0
- Width = 8
- Caption = 'ToolButton2'
- ImageIndex = 18
- Style = tbsSeparator
- end
- object ButtonHelp: TToolButton
- Left = 180
- Top = 0
- Hint = 'Help'
- HelpType = htKeyword
- Caption = 'ButtonHelp'
- ImageIndex = 17
- OnClick = ButtonHelpClick
- end
- end
- end
- object registry: TRspReg
- OnFoundKey = registryFoundKey
- OnFoundData = registryFoundData
- OnFoundValue = registryFoundValue
- Key = 2147483647
- RootKey = 2147483647
- RootKeyIndex = rkHKEY_NONE
- AbbreviatedRootKeys = False
- SearchCaseSensitive = True
- SearchPriority = tpLowest
- SearchKeys = True
- SearchValues = True
- SearchData = False
- SearchType = stText
- SearchExpandEnvironment = False
- Left = 312
- Top = 328
- end
- object ActionListKeyProp: TActionList
- Left = 424
- Top = 456
- object ActionHelp: TAction
- Caption = 'ActionHelp'
- ShortCut = 112
- OnExecute = ActionHelpExecute
- end
- object ActionRefresh: TAction
- Caption = 'ActionRefresh'
- ShortCut = 116
- OnExecute = ActionRefreshExecute
- end
- end
- end
-