Chip 1998 May/Chip_1998-05_cd.bin/sharewar/regview/REGVIEW.EXE/0/RCDATA/TREGVIEWFORM/TREGVIEWFORM.txt

Text File | 1997-05-13 | 27KB | 935 lines

object RegViewForm: TRegViewForm
  Left = 312
  Top = 214
  Width = 618
  Height = 491
  VertScrollBar.Range = 108
  AutoScroll = False
  Caption = 'RegView'
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  Position = poScreenCenter
  PrintScale = poPrintToFit
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object StatusBar1: TStatusBar
    Left = 0
    Top = 421
    Width = 610
    Height = 24
    Panels = <>
    SimplePanel = True
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 610
    Height = 1
    Align = alTop
    BevelOuter = bvLowered
    TabOrder = 1
    object Label3: TLabel
      Left = 12
      Top = 14
      Width = 95
      Height = 19
      Caption = 'Current Root:'
    end
    object ComboKey: TComboBox
      Left = 108
      Top = 9
      Width = 326
      Height = 24
      Style = csDropDownList
      ItemHeight = 16
      Items.Strings = (
        'HKEY_CLASSES_ROOT'
        'HKEY_CURRENT_USER'
        'HKEY_LOCAL_MACHINE'
        'HKEY_USERS'
        'HKEY_CURRENT_CONFIG'
        'HKEY_DYN_DATA')
      TabOrder = 0
      Visible = False
      OnChange = ComboKeyChange
    end
  end
  object PnlList: TPanel
    Left = 362
    Top = 48
    Width = 248
    Height = 373
    Align = alClient
    BevelOuter = bvNone
    BorderStyle = bsSingle
    TabOrder = 2
    object ListView1: TListView
      Left = 0
      Top = 0
      Width = 244
      Height = 369
      Align = alClient
      BorderStyle = bsNone
      OnClick = ListView1Click
      OnDblClick = ListView1DblClick
      Columns = <
        item
          Caption = 'Name'
          Width = 120
        end
        item
          Caption = 'Data'
          Width = 150
        end
        item
          Caption = 'Type'
          Width = 60
        end>
      ReadOnly = False
      OnEdited = ListView1Edited
      OnEditing = ListView1Editing
      DragCursor = crArrow
      OnMouseDown = ListView1MouseDown
      PopupMenu = PopupMenu2
      SortType = stText
      TabOrder = 0
      ViewStyle = vsReport
      LargeImages = Large
      SmallImages = Small
    end
    object CopyKey: TEdit
      Left = 10
      Top = 423
      Width = 405
      Height = 24
      TabOrder = 1
      Visible = False
    end
  end
  object PnlSplitter: TPanel
    Left = 356
    Top = 48
    Width = 6
    Height = 373
    Cursor = crHSplit
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 3
    OnMouseDown = PnlSplitterMouseDown
    OnMouseMove = PnlSplitterMouseMove
    OnMouseUp = PnlSplitterMouseUp
  end
  object PnlTree: TPanel
    Left = 0
    Top = 48
    Width = 356
    Height = 373
    Align = alLeft
    BevelOuter = bvNone
    BorderStyle = bsSingle
    Caption = 'PnlTree'
    TabOrder = 4
    object TreeView1: TTreeView
      Left = 0
      Top = 0
      Width = 352
      Height = 369
      BorderStyle = bsNone
      DragCursor = crArrow
      Indent = 19
      OnEditing = TreeView1Editing
      OnEdited = TreeView1Edited
      OnExpanding = TreeView1Expanding
      OnChanging = TreeView1Changing
      Align = alClient
      ParentColor = False
      TabOrder = 0
      OnMouseDown = TreeView1MouseDown
      PopupMenu = PopupMenu1
      Images = Small
    end
  end
  object PnlMask: TPanel
    Left = -12
    Top = 39
    Width = 6
    Height = 532
    Cursor = crHSplit
    BevelOuter = bvNone
    Color = clBtnShadow
    TabOrder = 5
    OnMouseDown = PnlSplitterMouseDown
    OnMouseMove = PnlSplitterMouseMove
    OnMouseUp = PnlSplitterMouseUp
  end
  object Panel1: TPanel
    Left = 0
    Top = 1
    Width = 610
    Height = 47
    Align = alTop
    Alignment = taLeftJustify
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Caption =
      'RegView RegView RegView RegView RegView RegView RegView RegView ' +
      'RegView RegView RegView RegView RegView RegView RegView RegView ' +
      'RegView RegView RegView RegView RegView RegView RegView'
    Font.Color = clTeal
    Font.Height = -38
    Font.Name = 'MS Sans Serif'
    Font.Pitch = fpFixed
    Font.Style = [fsItalic]
    ParentFont = False
    ParentShowHint = False
    ShowHint = False
    TabOrder = 6
    object NewExplorerButton: TExplorerButton
      Left = 2
      Top = 1
      Width = 56
      Height = 45
      Hint = ' New '
      Bitmap.Data = {
        3C010000424D3C010000000000004A0000002800000014000000140000000100
        04000000000000000000120B0000120B00000500000005000000FFFFFF0000FF
        FF00C0C0C0000020200000000000222222222222222222224004222222222222
        2222222222222223333333333333322222222223111111111111322222232223
        1111111111113222222322231111111111113222222322231111111111113222
        2223222311111111111132222223222311111111111132222223222311111111
        1111322222232223111111111111322222232223111111111111322222232223
        1111111111113222222322231111111133333222222322231111111134444222
        2223222311111111300422222223222311111111344222222223222333333333
        3222222222232222222222222222222222232222222222222222222222220000}
      Caption = 'New'
      DropDownMenu = PopupMenu3
      Enabled = False
      Options = [boMonoDisplay, boPopupMark]
      ShadingType = stDark
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpFixed
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object DeleteExplorerButton: TExplorerButton
      Left = 57
      Top = 1
      Width = 56
      Height = 45
      Hint = ' Delete '
      Bitmap.Data = {
        40010000424D40010000000000004E0000002800000015000000140000000100
        04000000000000000000CC0E0000CC0E00000600000006000000FFFFFF000000
        FF005757E2007979D700C0C0C000000000004444444444444444444440004444
        4444444444444444400044444444444444414444400044114444444444414444
        4000411114444444441144444000411114444444111444444000441111444441
        1144444440004411114444411144444440004444111444114444444440004444
        4111111444444444400044444411114444444444400044444111111444444444
        4000444441111114444444444000444411144414444444444000411111444441
        1144444440001111144444441114444440001144444444444411444440001144
        4444444444114444400044444444444444444444400044444444444444444444
        40000000}
      Caption = 'Delete'
      Enabled = False
      Options = [boMonoDisplay, boPopupMark]
      ShadingType = stDark
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpFixed
      Font.Style = []
      OnClick = Delete1Click
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object RenameExplorerButton: TExplorerButton
      Left = 112
      Top = 1
      Width = 56
      Height = 45
      Hint = ' Rename '
      Bitmap.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000CE0E0000C40E00000000000000000000FFFFFF00DFFF
        FF0000FFFF000C00FF00DFFFE300000000001E8485006F170100000097008B00
        00008400CB007717A7006F173C0000004E001E431E0000000E00000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000000000000000000000000000EE0EE000050000333300
        0000EE0EE0000550003333300000EE0EE0000555003303300000EE0EE0555555
        503303300000EEEEE0555555503333000000EE0EE0000555003303300000EE0E
        E00005500033033000000EEE0000050000333300000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        0000000000000000000000000000000000000000000000000000000000000000
        00000000000000000000}
      Caption = 'Rename'
      Options = [boMonoDisplay, boPopupMark]
      ShadingType = stDark
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpFixed
      Font.Style = []
      OnClick = Rename1Click
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object SearchExplorerButton: TExplorerButton
      Left = 167
      Top = 1
      Width = 56
      Height = 45
      Hint = ' Search '
      Bitmap.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC000000CE0E0000C40E00000000000000000000FFFFFF0000FF
        FF000000FF00C0C0C0008080800000008000000000000000E4F35B003F010000
        4416F7BF000200000300000072F45B007AF45B00D1100010A0A2333333333131
        3131313130003333333333333333333330003333333331313131313130003333
        3333333333333333300033333333313131313131300033333333333333333333
        3000333333336131313131313000333333365633333333333000333333365461
        3131313130003333333655463333333330003333336455526131313130003333
        3363352226333333300033333633002222633333300033336330000666333333
        3000333633000663333333333000336330006333333333333000363300062333
        3333333330003630006233333333333330003360063333333333333330003336
        63333333333333333000333333333333333333333000}
      Caption = 'Search'
      Options = [boMonoDisplay, boPopupMark]
      ShadingType = stDark
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpFixed
      Font.Style = []
      OnClick = Search1Click
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object S_DExplorerButton5: TExplorerButton
      Left = 222
      Top = 1
      Width = 56
      Height = 45
      Hint = 'Search & Delete'
      Bitmap.Data = {
        72010000424D7201000000000000760000002800000015000000150000000100
        040000000000FC000000CE0E0000C40E00000000000000000000FFFFFF0000FF
        FF000000FF00C0C0C0008080800000008000000000000000E4F35B003F010000
        4416F7BF000200000300000072F45B007AF45B00D1100010A0A2333333333131
        6131313130003333333333336633336330003333333331313631363130003333
        3333333333666333300033333333313131663131300033333333333336636333
        3000333333336131663136313000333333365636333333633000333333365461
        3131313130003333333655463333333330003333336455526131313130003333
        3363352226333333300033333633002222633333300033336330000666333333
        3000333633000663333333333000336330006333333333333000363300062333
        3333333330003630006233333333333330003360063333333333333330003336
        63333333333333333000333333333333333333333000}
      Caption = 'S && D'
      Options = [boMonoDisplay, boPopupMark]
      ShadingType = stDark
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpFixed
      Font.Style = []
      OnClick = SearchDelete1Click
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object S_RExplorerButton6: TExplorerButton
      Left = 277
      Top = 1
      Width = 56
      Height = 45
      Hint = 'Search & Replace'
      Bitmap.Data = {
        7E010000424D7E01000000000000760000002800000015000000160000000100
        04000000000008010000CE0E0000C40E00000000000000000000FFFFFF0000FF
        FF000000FF00C0C0C0008080800000008000000000000000E4F35B003F010000
        4416F7BF000200000300000072F45B007AF45B00D1100010A0A2333333333333
        3333333330003333333333333333333330003366366313161316666310003366
        3663333663366366300033663663666666166166100033666663666666366663
        3000336636631316631663661000333666333336333666633000333333361313
        1313131310003333336563333333333330003333336546131313131310003333
        3365546333333333300033333645552613131313100033333633522263333333
        3000333363300222263333333000333633000066633333333000336330006633
        3333333330003633000633333333333330003630006233333333333330003360
        0623333333333333300033366333333333333333300033333333333333333333
        3000}
      Caption = 'S && R'
      Options = [boMonoDisplay, boPopupMark]
      ShadingType = stDark
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpFixed
      Font.Style = []
      OnClick = SearchReplace1Click
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object ExplorerButton1: TExplorerButton
      Left = 387
      Top = 1
      Width = 56
      Height = 45
      Hint = ' Print '
      Bitmap.Data = {
        30010000424D30010000000000004A0000002800000013000000130000000100
        04000000000000000000120B0000120B00000500000005000000FFFFFF000000
        FF00C0C0C0008080800000000000222222222222222222204104244422222222
        2244422022224444444444444444442024444022222222222222242044444022
        2222222222222420402240222222222221122420402240000000000000000420
        4022344333333333333443204000224444444444444422203443224400000000
        0044222022442224044444444042222022442224000000000042222022242224
        0444444440422220222422240000000000422220222422240440000000422220
        2224222400000000004222202224222444444444444222202224222222222222
        2222222022242222222222222222222022220000}
      Caption = 'Print'
      Options = [boMonoDisplay, boPopupMark]
      ShadingType = stDark
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpFixed
      Font.Style = []
      OnClick = Print1Click
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object ExplorerButton2: TExplorerButton
      Left = 332
      Top = 1
      Width = 56
      Height = 45
      Hint = ' Refresh '
      Bitmap.Data = {
        66010000424D6601000000000000760000002800000014000000140000000100
        040000000000F0000000CE0E0000C40E00000000000000000000FFFFFF0000FF
        FF00C0C0C0000020200000000000CBCBCB003232320000800000000006000000
        FF00FF00CB00CB00C000C0003200320000005B00B800B87FFF00222222222222
        2222222200002222222222222222222200002223333333333333322200002223
        0000000000003222000022230000070000003222000022230000770000003222
        0000222300077777000032220000222300007700700032220000222300000700
        7000322200002223007000007000322200002223007007000000322200002223
        0070077000003222000022230007777700003222000022230000077033333222
        0000222300000700344442220000222300000000300422220000222300000000
        3442222200002223333333333222222200002222222222222222222200002222
        22222222222222220000}
      Caption = 'Refresh'
      Options = [boMonoDisplay, boPopupMark]
      ShadingType = stDark
      Font.Color = clRed
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Pitch = fpFixed
      Font.Style = []
      OnClick = Refresh1Click
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
    end
    object lzrw11: Tlzrw1
      Left = 502
      Top = 10
      Width = 198
      Height = 31
      CompressMode = Auto
      ParentShowHint = False
      ShowHint = False
      TabOrder = 0
      Visible = False
    end
  end
  object MainMenu1: TMainMenu
    Left = 256
    Top = 64
    object File1: TMenuItem
      Caption = '&File'
      ShortCut = 0
      object ImportRegistryFiles1: TMenuItem
        Caption = '&Import Registry Files...'
        ShortCut = 0
        OnClick = ImportRegistryFiles1Click
      end
      object ExportRegistryFiles1: TMenuItem
        Caption = '&Export Registry Files...'
        ShortCut = 0
        OnClick = ExportRegistryFiles1Click
      end
      object N13: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object PrintSetup1: TMenuItem
        Caption = 'Print &Setup'
        ShortCut = 0
        OnClick = PrintSetup1Click
      end
      object Print1: TMenuItem
        Caption = '&Print'
        ShortCut = 16464
        OnClick = Print1Click
      end
      object N9: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        ShortCut = 0
        OnClick = Exit1Click
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      ShortCut = 0
      object Modify1: TMenuItem
        Caption = '&Modify'
        ShortCut = 0
        Visible = False
        OnClick = ListView1DblClick
      end
      object Bar1: TMenuItem
        Caption = '-'
        ShortCut = 0
        Visible = False
      end
      object New1: TMenuItem
        Caption = '&New'
        ShortCut = 0
        object Key1: TMenuItem
          Caption = '&Key'
          ShortCut = 0
          OnClick = Key1Click
        end
        object N2: TMenuItem
          Caption = '-'
          ShortCut = 0
        end
        object StringValue1: TMenuItem
          Caption = '&String Value'
          ShortCut = 0
          OnClick = StringValue1Click
        end
        object BinaryValue1: TMenuItem
          Caption = '&Binary Value'
          ShortCut = 0
          OnClick = BinaryValue1Click
        end
        object DWORDValue1: TMenuItem
          Caption = '&DWORD Value'
          ShortCut = 0
          OnClick = DWORDValue1Click
        end
      end
      object Bar2: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Delete1: TMenuItem
        Caption = '&Delete'
        Enabled = False
        ShortCut = 46
        OnClick = Delete1Click
      end
      object Rename1: TMenuItem
        Caption = '&Rename'
        Enabled = False
        ShortCut = 0
        OnClick = Rename1Click
      end
      object N3: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object CopyKeyName1: TMenuItem
        Caption = '&Copy Key Name'
        ShortCut = 0
        OnClick = CopyKeyName1Click
      end
      object N10: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Search1: TMenuItem
        Caption = '&Search'
        ShortCut = 0
        OnClick = Search1Click
      end
      object N4: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object SearchDelete1: TMenuItem
        Caption = 'Search && D&elete'
        ShortCut = 0
        OnClick = SearchDelete1Click
      end
      object SearchReplace1: TMenuItem
        Caption = 'Search && Re&place'
        ShortCut = 0
        OnClick = SearchReplace1Click
      end
    end
    object View1: TMenuItem
      Caption = '&View'
      ShortCut = 0
      object LargeIcon1: TMenuItem
        Caption = 'Lar&ge Icon'
        GroupIndex = 1
        RadioItem = True
        ShortCut = 0
        OnClick = LargeIcon1Click
      end
      object SmallIcon1: TMenuItem
        Caption = 'S&mall Icon'
        GroupIndex = 1
        RadioItem = True
        ShortCut = 0
        OnClick = SmallIcon1Click
      end
      object List1: TMenuItem
        Caption = '&List'
        GroupIndex = 1
        RadioItem = True
        ShortCut = 0
        OnClick = List1Click
      end
      object Detail1: TMenuItem
        Caption = '&Detail'
        Checked = True
        GroupIndex = 1
        RadioItem = True
        ShortCut = 0
        OnClick = Detail1Click
      end
      object N1: TMenuItem
        Caption = '-'
        GroupIndex = 2
        ShortCut = 0
      end
      object StatusBar2: TMenuItem
        Caption = 'Status &Bar'
        Checked = True
        GroupIndex = 2
        ShortCut = 0
        OnClick = StatusBar2Click
      end
      object ToolBar1: TMenuItem
        Caption = '&Tool Bar'
        Checked = True
        GroupIndex = 2
        ShortCut = 0
        OnClick = ToolBar1Click
      end
      object N7: TMenuItem
        Caption = '-'
        GroupIndex = 2
        ShortCut = 0
      end
      object Split1: TMenuItem
        Caption = 'S&plit'
        GroupIndex = 2
        ShortCut = 0
        OnClick = Split1Click
      end
      object N12: TMenuItem
        Caption = '-'
        GroupIndex = 2
        ShortCut = 0
      end
      object Refresh1: TMenuItem
        Caption = '&Refresh'
        GroupIndex = 2
        ShortCut = 116
        OnClick = Refresh1Click
      end
    end
    object Tools1: TMenuItem
      Caption = '&Tools'
      ShortCut = 0
      OnClick = Tools1Click
      object RecordCurrentRegistry1: TMenuItem
        Caption = '&Record Current Registry'
        ShortCut = 0
        OnClick = RecordCurrentRegistry1Click
      end
      object ComparewithLastRecordedRegistry1: TMenuItem
        Caption = '&Compare to Last Recorded Registry'
        ShortCut = 0
        OnClick = ComparewithLastRecordedRegistry1Click
      end
      object N14: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object Recordwininisystemini1: TMenuItem
        Caption = 'Record &INI Files'
        ShortCut = 0
        OnClick = Recordwininisystemini1Click
      end
      object ComparetoLastRecordedIni1: TMenuItem
        Caption = 'Compare to &Last Recorded  INI Files'
        ShortCut = 0
        OnClick = ComparetoLastRecordedIni1Click
      end
      object N15: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object RecordDIRsFILEs1: TMenuItem
        Caption = 'Record &DIRs && FILEs'
        ShortCut = 0
        OnClick = RecordDIRsFILEs1Click
      end
      object ComparetoLastRecordedDIRsFILEs1: TMenuItem
        Caption = 'Compare to Last Recorded DIRs && &FILEs'
        ShortCut = 0
        OnClick = ComparetoLastRecordedDIRsFILEs1Click
      end
      object N16: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object RecordAll1: TMenuItem
        Caption = 'Quick Record &All'
        ShortCut = 0
        OnClick = RecordAll1Click
      end
      object CompareRestoreAll1: TMenuItem
        Caption = 'Quick Compare && R&estore All'
        ShortCut = 0
        OnClick = CompareRestoreAll1Click
      end
    end
    object Register1: TMenuItem
      Caption = '&Register'
      ShortCut = 0
      Visible = False
      OnClick = Register1Click
    end
    object about1: TMenuItem
      Caption = '&About'
      ShortCut = 0
      OnClick = about1Click
    end
  end
  object Large: TImageList
    Height = 32
    Width = 32
    Left = 256
    Top = 328
  end
  object Small: TImageList
    Left = 288
    Top = 328
  end
  object PopupMenu1: TPopupMenu
    AutoPopup = False
    OnPopup = PopupMenu1Popup
    Left = 178
    Top = 75
    object Expand1: TMenuItem
      Caption = '&Expand'
      ShortCut = 0
      OnClick = Expand1Click
    end
    object New2: TMenuItem
      Caption = '&New'
      ShortCut = 0
      object Key2: TMenuItem
        Caption = '&Key'
        ShortCut = 0
        OnClick = Key1Click
      end
      object N6: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object StringValue2: TMenuItem
        Caption = '&String Value'
        ShortCut = 0
        OnClick = StringValue1Click
      end
      object BinaryValue3: TMenuItem
        Caption = '&Binary Value'
        ShortCut = 0
        OnClick = BinaryValue1Click
      end
      object DWORDValue2: TMenuItem
        Caption = '&DWORD Value'
        ShortCut = 0
        OnClick = DWORDValue1Click
      end
    end
    object N5: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Delete2: TMenuItem
      Caption = '&Delete'
      ShortCut = 0
      OnClick = Delete1Click
    end
    object Rename2: TMenuItem
      Caption = '&Rename'
      ShortCut = 0
      OnClick = Rename1Click
    end
    object N11: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object CopyKeyName2: TMenuItem
      Caption = '&Copy Key Name'
      ShortCut = 0
      OnClick = CopyKeyName1Click
    end
  end
  object PopupMenu2: TPopupMenu
    AutoPopup = False
    OnPopup = PopupMenu2Popup
    Left = 178
    Top = 123
    object Modify2: TMenuItem
      Caption = '&Modify'
      ShortCut = 0
      OnClick = ListView1DblClick
    end
    object MenuItem2: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Delete3: TMenuItem
      Caption = '&Delete'
      ShortCut = 0
      OnClick = Delete1Click
    end
    object Rename3: TMenuItem
      Caption = '&Rename'
      ShortCut = 0
      OnClick = Rename1Click
    end
    object New3: TMenuItem
      Caption = '&New'
      ShortCut = 0
      Visible = False
      object Key3: TMenuItem
        Caption = '&Key'
        ShortCut = 0
        OnClick = Key1Click
      end
      object N17: TMenuItem
        Caption = '-'
        ShortCut = 0
      end
      object StringValue3: TMenuItem
        Caption = '&String Value'
        ShortCut = 0
        OnClick = StringValue1Click
      end
      object BinaryValue4: TMenuItem
        Caption = '&Binary Value'
        ShortCut = 0
        OnClick = BinaryValue1Click
      end
      object DWORDValue3: TMenuItem
        Caption = '&DWORD Value'
        ShortCut = 0
        OnClick = DWORDValue1Click
      end
    end
  end
  object PopupMenu3: TPopupMenu
    AutoPopup = False
    OnPopup = PopupMenu1Popup
    Left = 138
    Top = 123
    object MenuItem4: TMenuItem
      Caption = '&Key'
      ShortCut = 0
      OnClick = Key1Click
    end
    object N8: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object MenuItem6: TMenuItem
      Caption = '&String Value'
      ShortCut = 0
      OnClick = StringValue1Click
    end
    object BinaryValue2: TMenuItem
      Caption = '&Binary Value'
      ShortCut = 0
      OnClick = BinaryValue1Click
    end
    object MenuItem7: TMenuItem
      Caption = '&DWORD Value'
      ShortCut = 0
      OnClick = DWORDValue1Click
    end
  end
  object PrintDialog1: TPrintDialog
    Left = 90
    Top = 99
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 210
    Top = 235
  end
  object OpenDialog1: TOpenDialog
    FileEditStyle = fsEdit
    Filter = 'Registry Files(*.reg)|*.reg|All Files(*.*)|*.*'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Title = 'Import Registry Files'
    Left = 42
    Top = 203
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'reg'
    FileEditStyle = fsEdit
    Filter = 'Registry Files(*.reg)|*.reg|All Files(*.*)|*.*'
    Options = [ofHideReadOnly]
    Title = 'Export Registry Files'
    Left = 104
    Top = 208
  end
  object VersionInfo1: TVersionInfo
    ResFilename = 'VERSION.RES'
    FileVerNum = '0.0.0.0'
    ProdVerNum = '0.0.0.0'
    VFileOS = Windows32
    VFileType = App
    Comments = 'Windows 95 Registry Tool'
    CompanyName = 'Vincent Chiu'#39's Software'
    FileDescription = 'RegView'
    FileVersion = '2.2'
    InternalName = 'regview.exe'
    LegalCopyright = 'Copyright(c) by Vincent Chiu'
    OriginalFilename = 'regview.exe'
    ProductName = 'RegView'
    ProductVersion = '2.2'
    Left = 384
    Top = 91
  end
end