Chip 2002 October/Chip_2002-10_cd1.bin/sharewar/slunec/app/reglite.exe/RL.EXE/0/RCDATA/TSEARCHFORM/TSEARCHFORM.txt

Text File | 2002-08-11 | 14.8 KB | 634 lines

object SearchForm: TSearchForm
  Tag = 5
  Left = 352
  Top = 87
  Width = 800
  Height = 743
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
  Caption = 'Search'
  Color = clBtnFace
  DragKind = dkDock
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = True
  Position = poDefault
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnEndDock = FormEndDock
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 13
  object SplitterSearch: TSplitter
    Left = 185
    Top = 0
    Width = 3
    Height = 656
    Cursor = crHSplit
    Beveled = True
    MinSize = 10
    ResizeStyle = rsUpdate
    OnMoved = SplitterSearchMoved
  end
  object PanelSearch: TPanel
    Left = 0
    Top = 0
    Width = 185
    Height = 656
    Align = alLeft
    BevelOuter = bvNone
    TabOrder = 0
    object ButtonCancel: TButton
      Left = 88
      Top = 344
      Width = 75
      Height = 25
      Cancel = True
      Caption = 'ButtonCancel'
      ModalResult = 2
      TabOrder = 1
      OnClick = ButtonCancelClick
    end
    object PanelSearchOptions: TPanel
      Left = 0
      Top = 65
      Width = 185
      Height = 200
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 0
      DesignSize = (
        185
        200)
      object LabelSearchFor: TLabel
        Left = 8
        Top = 0
        Width = 86
        Height = 13
        Caption = 'Text to search for:'
      end
      object Label4: TLabel
        Left = 8
        Top = 48
        Width = 48
        Height = 13
        Caption = 'Search in:'
      end
      object ButtonBrowse: TSpeedButton
        Left = 154
        Top = 86
        Width = 23
        Height = 17
        Anchors = [akTop, akRight]
        Caption = '..'
        OnClick = ButtonBrowseClick
        OnMouseDown = ButtonBrowseMouseDown
      end
      object ComboBoxSearchText: TComboBox
        Left = 8
        Top = 16
        Width = 170
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        ItemHeight = 13
        TabOrder = 0
        OnChange = ComboBoxSearchTextChange
        OnDropDown = ComboBoxSearchTextDropDown
        OnExit = ComboBoxSearchTextExit
        OnKeyDown = ComboBoxSearchTextKeyDown
        OnKeyPress = ComboBoxSearchTextKeyPress
      end
      object ComboBoxKey: TComboBox
        Left = 8
        Top = 64
        Width = 170
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        ItemHeight = 13
        ParentShowHint = False
        ShowHint = False
        TabOrder = 1
        OnKeyDown = ComboBoxKeyKeyDown
      end
      object CheckBoxSearchKeys: TCheckBox
        Left = 8
        Top = 98
        Width = 89
        Height = 17
        Caption = 'Key names'
        Checked = True
        PopupMenu = PopupMenuSearchToolbar
        State = cbChecked
        TabOrder = 2
      end
      object CheckBoxSearchValues: TCheckBox
        Left = 8
        Top = 114
        Width = 97
        Height = 17
        Caption = 'Value names'
        Checked = True
        PopupMenu = PopupMenuSearchToolbar
        State = cbChecked
        TabOrder = 3
      end
      object CheckBoxSearchData: TCheckBox
        Left = 8
        Top = 130
        Width = 65
        Height = 18
        Caption = 'Data'
        Checked = True
        PopupMenu = PopupMenuSearchToolbar
        State = cbChecked
        TabOrder = 4
      end
      object CheckBoxCaseSensitive: TCheckBox
        Left = 8
        Top = 154
        Width = 113
        Height = 17
        Caption = 'Case sensitive'
        TabOrder = 5
      end
      object CheckBoxExpand: TCheckBox
        Left = 8
        Top = 170
        Width = 159
        Height = 17
        Caption = 'Expand environment strings'
        TabOrder = 6
      end
    end
    object PanelSearchType: TPanel
      Left = 0
      Top = 0
      Width = 185
      Height = 65
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 2
      DesignSize = (
        185
        65)
      object Label2: TLabel
        Left = 8
        Top = 16
        Width = 74
        Height = 13
        Caption = 'Type of search:'
      end
      object ComboBoxSearchType: TComboBox
        Left = 8
        Top = 32
        Width = 170
        Height = 21
        Style = csDropDownList
        Anchors = [akLeft, akTop, akRight]
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 0
        Text = 'Simple text search'
        OnChange = ComboBoxSearchTypeChange
        Items.Strings = (
          'Simple text search'
          'Regular expression search'
          'Binary data search')
      end
    end
    object Panel2: TPanel
      Left = 0
      Top = 265
      Width = 185
      Height = 200
      Align = alTop
      BevelOuter = bvNone
      TabOrder = 3
      object Label5: TLabel
        Left = 8
        Top = 76
        Width = 67
        Height = 13
        Caption = 'data matches:'
      end
      object Label3: TLabel
        Left = 8
        Top = 60
        Width = 101
        Height = 13
        Alignment = taRightJustify
        Caption = 'value name matches:'
      end
      object Label6: TLabel
        Left = 8
        Top = 44
        Width = 97
        Height = 13
        Alignment = taRightJustify
        Caption = 'key names matches:'
      end
      object Label12: TLabel
        Left = 8
        Top = 20
        Width = 73
        Height = 13
        Caption = 'Keys searched:'
      end
      object LabelKeysSearched: TLabel
        Left = 132
        Top = 20
        Width = 6
        Height = 13
        BiDiMode = bdLeftToRight
        Caption = '0'
        ParentBiDiMode = False
      end
      object LabelKeysFound: TLabel
        Left = 132
        Top = 44
        Width = 30
        Height = 13
        AutoSize = False
        Caption = '0'
      end
      object LabelValuesFound: TLabel
        Left = 132
        Top = 60
        Width = 33
        Height = 13
        AutoSize = False
        Caption = '0'
      end
      object LabelDataFound: TLabel
        Left = 132
        Top = 76
        Width = 25
        Height = 18
        AutoSize = False
        Caption = '0'
        DragKind = dkDock
      end
    end
  end
  object panelResults: TPanel
    Left = 188
    Top = 0
    Width = 604
    Height = 656
    Align = alClient
    AutoSize = True
    BevelOuter = bvNone
    BorderWidth = 3
    TabOrder = 1
    object ListViewSearch: TListView
      Left = 3
      Top = 3
      Width = 598
      Height = 650
      Align = alClient
      Columns = <
        item
          Caption = 'Machine'
          Width = 80
        end
        item
          Caption = 'Key'
          Width = 314
        end
        item
          Caption = 'Value'
          Width = 100
        end
        item
          Caption = 'Data'
          Width = 100
        end>
      FullDrag = True
      GridLines = True
      HideSelection = False
      HotTrackStyles = [htHandPoint, htUnderlineHot]
      MultiSelect = True
      ReadOnly = True
      RowSelect = True
      PopupMenu = PopupMenuSearch
      SmallImages = MainForm.listSmall
      TabOrder = 0
      ViewStyle = vsReport
      OnColumnClick = ListViewSearchColumnClick
      OnCompare = ListViewSearchCompare
      OnDblClick = ListViewSearchDblClick
      OnKeyDown = ListViewSearchKeyDown
      OnSelectItem = ListViewSearchSelectItem
    end
  end
  object CoolbarSearch: TCoolBar
    Left = 0
    Top = 656
    Width = 792
    Height = 34
    Align = alBottom
    AutoSize = True
    BandBorderStyle = bsNone
    Bands = <
      item
        Break = False
        Control = ToolBarSearch
        ImageIndex = -1
        MinHeight = 30
        Width = 788
      end>
    object ToolBarSearch: TToolBar
      Tag = 2
      Left = 9
      Top = 0
      Width = 775
      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 = 0
      Transparent = True
      Wrapable = False
      object ButtonSearch: TToolButton
        Left = 0
        Top = 0
        Hint = 'Search'
        Caption = 'ButtonSearch'
        ImageIndex = 10
        OnClick = ButtonSearchClick
      end
      object ButtonPause: TToolButton
        Left = 31
        Top = 0
        Hint = 'Pause'
        Caption = 'ButtonPause'
        Enabled = False
        ImageIndex = 27
        OnClick = ButtonPauseClick
      end
      object ButtonStop: TToolButton
        Left = 62
        Top = 0
        Hint = 'Stop'
        Caption = 'ButtonStop'
        Enabled = False
        ImageIndex = 32
        OnClick = ButtonStopClick
      end
      object ToolButton3: TToolButton
        Left = 93
        Top = 0
        Width = 8
        Caption = 'ToolButton3'
        ImageIndex = 19
        Style = tbsSeparator
      end
      object ButtonJumpTo: TToolButton
        Left = 101
        Top = 0
        Hint = 'Jump to'
        Caption = '&Jump To'
        Enabled = False
        ImageIndex = 25
        OnClick = ButtonJumpToClick
      end
      object ButtonReplace: TToolButton
        Left = 132
        Top = 0
        Hint = 'Replace'
        Caption = 'ButtonReplace'
        Enabled = False
        ImageIndex = 7
        OnClick = ButtonReplaceClick
      end
      object ButtonDelete: TToolButton
        Left = 163
        Top = 0
        Hint = 'Delete'
        Caption = 'ButtonDelete'
        DropdownMenu = mmSearchRemoveItems
        Enabled = False
        ImageIndex = 6
        Style = tbsDropDown
        OnClick = ButtonDeleteClick
      end
      object ToolButton21: TToolButton
        Left = 207
        Top = 0
        Width = 8
        Caption = 'ToolButton21'
        ImageIndex = 15
        Style = tbsSeparator
      end
      object ButtonBookmark: TToolButton
        Left = 215
        Top = 0
        Hint = 'Bookmark'
        Caption = 'ButtonBookmark'
        Enabled = False
        ImageIndex = 11
        OnClick = ButtonBookmarkClick
      end
      object ButtonProperties: TToolButton
        Left = 246
        Top = 0
        Hint = 'Properties'
        Caption = 'ButtonProperties'
        Enabled = False
        ImageIndex = 8
        OnClick = ButtonPropertiesClick
      end
      object ToolButton13: TToolButton
        Left = 277
        Top = 0
        Width = 8
        Caption = 'ToolButton13'
        ImageIndex = 8
        Style = tbsSeparator
      end
      object ButtonExport: TToolButton
        Left = 285
        Top = 0
        Hint = 'Export results'
        Caption = 'ButtonExport'
        Enabled = False
        ImageIndex = 24
        OnClick = ButtonExportClick
      end
      object ButtonExportSep: TToolButton
        Left = 316
        Top = 0
        Width = 8
        Caption = 'ButtonExportSep'
        ImageIndex = 15
        Style = tbsSeparator
      end
      object ButtonStayOnTop: TToolButton
        Left = 324
        Top = 0
        Hint = 'Stay on top'
        Caption = 'ButtonStayOnTop'
        ImageIndex = 16
        Style = tbsCheck
        OnClick = ButtonStayOnTopClick
      end
      object ButtonRemote: TToolButton
        Left = 355
        Top = 0
        Hint = 'Search a remote computer'
        Caption = 'ButtonRemote'
        ImageIndex = 19
        Visible = False
        OnClick = ButtonRemoteClick
      end
      object ToolButton2: TToolButton
        Left = 386
        Top = 0
        Width = 8
        Caption = 'ToolButton2'
        ImageIndex = 18
        Style = tbsSeparator
      end
      object ButtonHelp: TToolButton
        Left = 394
        Top = 0
        Hint = 'Help'
        Caption = 'ActionHelp'
        ImageIndex = 17
        OnClick = ButtonHelpClick
      end
    end
  end
  object PanelStatus: TPanel
    Left = 0
    Top = 690
    Width = 792
    Height = 19
    Align = alBottom
    AutoSize = True
    BevelOuter = bvNone
    TabOrder = 3
    object StatusBarSearch: TStatusBar
      Left = 0
      Top = 0
      Width = 792
      Height = 19
      Panels = <>
      SimplePanel = True
      SimpleText = 'Status: Ready'
    end
  end
  object SaveDialogSearch: TSaveDialog
    DefaultExt = '.txt'
    FileName = '*.reg'
    Filter = 'Registry Files  (*.reg) | *.reg'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Title = 'Save search results to a reg file'
    Left = 240
    Top = 136
  end
  object PopupMenuSearch: TPopupMenu
    Images = MainForm.ImageListMenu
    MenuAnimation = [maLeftToRight]
    OnPopup = PopupMenuSearchPopup
    Left = 368
    Top = 64
    object popupJumpTo: TMenuItem
      Caption = '&Jump To'
      ImageIndex = 23
      OnClick = popupJumpToClick
    end
    object popupBookmark: TMenuItem
      Caption = '&Bookmark'
      ImageIndex = 6
      OnClick = popupBookmarkClick
    end
    object popupRemove: TMenuItem
      Caption = 'R&emove from Search Results'
      ImageIndex = 3
      OnClick = popupRemoveClick
    end
    object popupDelete: TMenuItem
      Caption = '&Delete selected registry keys and values'
      ImageIndex = 3
      OnClick = popupDeleteClick
    end
    object popupReplace: TMenuItem
      Caption = '&Replace'
      ImageIndex = 34
      OnClick = popupReplaceClick
    end
  end
  object PopupMenuSearchToolbar: TPopupMenu
    OnPopup = PopupMenuSearchToolbarPopup
    Left = 240
    Top = 61
    object mmSearchToolbarAtBottom: TMenuItem
      Caption = 'Toolbar at bottom'
      OnClick = mmSearchToolbarAtBottomClick
    end
  end
  object ActionListSearch: TActionList
    Left = 370
    Top = 137
    object ActionHelp: TAction
      Caption = 'ActionHelp'
      ShortCut = 112
      OnExecute = ActionHelpExecute
    end
    object ActionSelectAll: TAction
      Caption = 'ActionSelectAll'
      ShortCut = 16449
      OnExecute = ActionSelectAllExecute
    end
  end
  object RspRegSearch: TRspReg
    OnChangeKey = RspRegSearchChangeKey
    OnSearchCompleted = RspRegSearchSearchCompleted
    OnFoundKey = RspRegSearchFoundKey
    OnFoundData = RspRegSearchFoundData
    OnFoundValue = RspRegSearchFoundValue
    Key = 2147483647
    RootKey = 2147483647
    RootKeyIndex = rkHKEY_NONE
    AbbreviatedRootKeys = False
    SearchCaseSensitive = False
    SearchPriority = tpLower
    SearchKeys = False
    SearchValues = False
    SearchData = False
    SearchType = stText
    SearchExpandEnvironment = False
    Left = 376
    Top = 208
  end
  object mmSearchRemoveItems: TPopupMenu
    Left = 242
    Top = 210
    object mmSearchRemoveEntries: TMenuItem
      Caption = '&Remove entries from list'
      OnClick = mmSearchRemoveEntriesClick
    end
    object mmSearchDelete: TMenuItem
      Caption = 'Delete selected keys and values'
      OnClick = mmSearchDeleteClick
    end
  end
end