Chip 2002 July/07_02.iso/test/resplendentregistrar/rrtri.exe/RR.EXE/0/RCDATA/TBOOKMARKFORM/TBOOKMARKFORM.txt

Text File | 2002-02-20 | 20.1 KB | 771 lines

object BookmarkForm: TBookmarkForm
  Tag = 6
  Left = 307
  Top = 247
  Width = 800
  Height = 600
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  Caption = 'Bookmarks'
  Color = clBtnFace
  DragKind = dkDock
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDefault
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDragDrop = FormDragDrop
  OnDragOver = FormDragOver
  OnEndDock = FormEndDock
  PixelsPerInch = 96
  TextHeight = 13
  object SplitterMain: TSplitter
    Left = 122
    Top = 0
    Width = 3
    Height = 386
    Cursor = crHSplit
    ResizeStyle = rsUpdate
    OnMoved = SplitterMainMoved
  end
  object CoolbarBookmark: TCoolBar
    Left = 0
    Top = 386
    Width = 792
    Height = 180
    Align = alBottom
    AutoSize = True
    Bands = <
      item
        Control = PanelKeyname
        ImageIndex = -1
        MinHeight = 24
        Width = 792
      end
      item
        Control = PanelValue
        ImageIndex = -1
        MinHeight = 24
        Width = 792
      end
      item
        Control = PanelDescription
        ImageIndex = -1
        MinHeight = 70
        Width = 792
      end
      item
        Control = PanelCategoryCombo
        ImageIndex = -1
        MinHeight = 24
        Width = 792
      end
      item
        Control = ToolbarButtons
        ImageIndex = -1
        MinHeight = 30
        Width = 685
      end
      item
        Break = False
        Control = PanelBookmarkColor
        ImageIndex = -1
        Width = 105
      end>
    EdgeInner = esNone
    EdgeOuter = esNone
    OnDragOver = CoolbarBookmarkDragOver
    OnMouseUp = CoolbarBookmarkMouseUp
    DesignSize = (
      792
      180)
    object Label2: TLabel
      Left = 434
      Top = 6
      Width = 27
      Height = 13
      Anchors = [akTop, akRight]
      Caption = 'Color:'
    end
    object PanelKeyname: TPanel
      Left = 9
      Top = 0
      Width = 779
      Height = 24
      Alignment = taLeftJustify
      BevelOuter = bvNone
      Caption = 'Key name:'
      TabOrder = 0
      DesignSize = (
        779
        24)
      object ComboBoxKey: TComboBox
        Left = 64
        Top = 1
        Width = 716
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        ItemHeight = 13
        TabOrder = 0
        OnDragDrop = ComboBoxKeyDragDrop
        OnDragOver = ComboBoxKeyDragOver
      end
    end
    object PanelCategoryCombo: TPanel
      Left = 9
      Top = 124
      Width = 779
      Height = 24
      Alignment = taLeftJustify
      Anchors = [akTop, akRight]
      BevelOuter = bvNone
      Caption = 'Category:'
      TabOrder = 3
      DesignSize = (
        779
        24)
      object ComboBoxCategory: TComboBox
        Left = 64
        Top = 1
        Width = 715
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        ItemHeight = 13
        TabOrder = 0
        OnChange = ComboBoxCategoryChange
        OnDragDrop = ComboBoxCategoryDragDrop
        OnDragOver = ComboBoxCategoryDragOver
        OnKeyDown = ComboBoxDescriptionOldKeyDown
      end
    end
    object PanelValue: TPanel
      Left = 9
      Top = 26
      Width = 779
      Height = 24
      Alignment = taLeftJustify
      BevelOuter = bvNone
      Caption = 'Value:'
      TabOrder = 1
      DesignSize = (
        779
        24)
      object Label1: TLabel
        Left = 280
        Top = 8
        Width = 3
        Height = 13
      end
      object ComboBoxValue: TComboBox
        Left = 64
        Top = 1
        Width = 716
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        ItemHeight = 13
        TabOrder = 0
        OnDragDrop = ComboBoxValueDragDrop
        OnDragOver = ComboBoxValueDragOver
      end
    end
    object PanelDescription: TPanel
      Left = 9
      Top = 52
      Width = 779
      Height = 70
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 2
      DesignSize = (
        779
        70)
      object Label3: TLabel
        Left = 0
        Top = 4
        Width = 56
        Height = 13
        Caption = 'Description:'
      end
      object ButtonCancel: TButton
        Left = 303
        Top = 16
        Width = 75
        Height = 30
        Cancel = True
        Caption = 'Cancel'
        ModalResult = 2
        TabOrder = 1
        OnClick = ButtonCancelClick
      end
      object MemoDescription: TMemo
        Left = 64
        Top = 0
        Width = 715
        Height = 68
        Anchors = [akLeft, akTop, akRight, akBottom]
        ScrollBars = ssVertical
        TabOrder = 0
        OnDragDrop = MemoDescriptionDragDrop
        OnDragOver = MemoDescriptionDragOver
      end
    end
    object PanelBookmarkColor: TPanel
      Left = 696
      Top = 152
      Width = 92
      Height = 25
      Alignment = taLeftJustify
      BevelOuter = bvNone
      Caption = 'Color:'
      PopupMenu = popupMenuBookmarkToolbar
      TabOrder = 4
      DesignSize = (
        92
        25)
      object ComboBoxKeyColor: TComboBox
        Left = 64
        Top = 1
        Width = 26
        Height = 22
        Style = csOwnerDrawFixed
        Anchors = [akLeft, akTop, akRight]
        ItemHeight = 16
        TabOrder = 1
        OnDrawItem = ComboBoxKeyColorDrawItem
        Items.Strings = (
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          '')
      end
      object ComboBoxValueHilite: TComboBox
        Left = 64
        Top = 1
        Width = 26
        Height = 22
        Style = csOwnerDrawFixed
        Anchors = [akLeft, akTop, akRight]
        ItemHeight = 16
        TabOrder = 0
        OnDrawItem = ComboBoxValueHiliteDrawItem
        Items.Strings = (
          ''
          '')
      end
    end
    object ToolbarButtons: TToolBar
      Tag = 2
      Left = 9
      Top = 150
      Width = 672
      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 = 5
      Transparent = True
      Wrapable = False
      DesignSize = (
        672
        30)
      object ButtonJumpTo: TToolButton
        Left = 0
        Top = 0
        Hint = 'Jump to'
        HelpType = htKeyword
        Caption = 'ButtonJumpTo'
        ImageIndex = 25
        OnClick = ButtonJumpToClick
      end
      object ToolButton22: TToolButton
        Left = 31
        Top = 0
        Width = 8
        Caption = 'ToolButton22'
        ImageIndex = 16
        Style = tbsSeparator
      end
      object ButtonRename: TToolButton
        Left = 39
        Top = 0
        Hint = 'Rename'
        ImageIndex = 7
        OnClick = ButtonRenameClick
      end
      object ButtonDelete: TToolButton
        Left = 70
        Top = 0
        Hint = 'Delete'
        Caption = 'ButtonDelete'
        ImageIndex = 6
        OnClick = ButtonDeleteClick
      end
      object ButtonProperties: TToolButton
        Left = 101
        Top = 0
        Hint = 'Properties'
        Caption = 'ButtonProperties'
        ImageIndex = 8
        OnClick = ButtonPropertiesClick
      end
      object ToolButton21: TToolButton
        Left = 132
        Top = 0
        Width = 8
        Caption = 'ToolButton21'
        ImageIndex = 15
        Style = tbsSeparator
      end
      object ButtonNewCategory: TToolButton
        Left = 140
        Top = 0
        Hint = 'New category'
        Caption = 'ButtonNewCategory'
        ImageIndex = 30
        OnClick = ButtonNewCategoryClick
      end
      object ButtonNewKey: TToolButton
        Left = 171
        Top = 0
        Hint = 'New Registry Value'
        Caption = 'ButtonNewKey'
        ImageIndex = 20
        OnClick = ButtonNewKeyClick
      end
      object ToolButton15: TToolButton
        Left = 202
        Top = 0
        Width = 8
        Caption = 'ToolButton2'
        ImageIndex = 21
        Style = tbsSeparator
      end
      object ButtonSearch: TToolButton
        Left = 210
        Top = 0
        Hint = 'Search'
        Caption = 'ButtonSearch'
        ImageIndex = 10
        OnClick = ButtonSearchClick
      end
      object ToolButton8: TToolButton
        Left = 241
        Top = 0
        Width = 8
        Caption = 'ToolButton8'
        ImageIndex = 18
        Style = tbsSeparator
      end
      object ButtonImport: TToolButton
        Left = 249
        Top = 0
        Hint = 'Import boomarks'
        Caption = 'ToolButton3'
        ImageIndex = 23
        OnClick = ButtonImportClick
      end
      object ButtonExport: TToolButton
        Left = 280
        Top = 0
        Hint = 'Export Bookmarks'
        Caption = 'ToolButton4'
        ImageIndex = 24
        OnClick = ButtonExportClick
      end
      object ToolButton13: TToolButton
        Left = 311
        Top = 0
        Width = 8
        Caption = 'ToolButton13'
        ImageIndex = 8
        Style = tbsSeparator
      end
      object ButtonStayOnTop: TToolButton
        Left = 319
        Top = 0
        Hint = 'Stay on top'
        Caption = 'ButtonStayOnTop'
        ImageIndex = 16
        Style = tbsCheck
        OnClick = ButtonStayOnTopClick
      end
      object ButtonDown: TSpeedButton
        Left = 350
        Top = 0
        Width = 20
        Height = 30
        Hint = 'Update bookmark'
        Anchors = [akTop, akRight]
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
          333333333337333333333333333033333333333333F733333333333333050333
          33333333337373333333333333050333333333333F7F73333333333330555033
          33333333373F3733333333333055503333333333F733F7333333333305555503
          333333337333F37333333333055555033333333F73333F733333333055555550
          3333333733333F373333333000050000333333F7777377773333333333050333
          333333FFFF7F7FF33333333333050333333333333F7F73333333333333050333
          333333333F7F73333333333333050333333333333F7F73333333333333050333
          333333333F7F73333333333333000333333333333F7773333333}
        Layout = blGlyphRight
        NumGlyphs = 2
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        Visible = False
        OnClick = ButtonUpdateClick
      end
      object ButtonUp: TSpeedButton
        Left = 370
        Top = 0
        Width = 22
        Height = 30
        Hint = 'Update bookmark'
        Anchors = [akTop, akRight]
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
          333333333F7773333333333333050333333333333F7F73333333333333050333
          333333333F7F73333333333333050333333333333F7F73333333333333050333
          333333333F7F73333333333333050333333333FFFF7F7FF33333333000050000
          333333F77773777733333330555555503333333733333F373333333305555503
          3333333F73333F733333333305555503333333337333F3733333333330555033
          33333333F733F733333333333055503333333333373F37333333333333050333
          333333333F7F7333333333333305033333333333337373333333333333303333
          3333333333F73333333333333330333333333333333733333333}
        Layout = blGlyphRight
        NumGlyphs = 2
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        Visible = False
        OnClick = ButtonUpdateClick
      end
      object ToolButton12: TToolButton
        Left = 392
        Top = 0
        Width = 8
        Caption = 'ToolButton12'
        ImageIndex = 18
        Style = tbsSeparator
      end
      object ButtonHelp: TToolButton
        Left = 400
        Top = 0
        Hint = 'Help'
        Caption = 'ButtonHelp'
        ImageIndex = 17
        OnClick = ButtonHelpClick
      end
      object ToolButton1: TToolButton
        Left = 431
        Top = 0
        Width = 34
        Caption = 'ToolButton1'
        ImageIndex = 18
        Style = tbsSeparator
      end
      object ButtonUpdate: TSpeedButton
        Left = 465
        Top = 0
        Width = 104
        Height = 30
        Hint = 'Save changes'
        Anchors = [akTop, akRight]
        Caption = '&Add/Update'
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000010000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
          333333333337333333333333333033333333333333F733333333333333050333
          33333333337373333333333333050333333333333F7F73333333333330555033
          33333333373F3733333333333055503333333333F733F7333333333305555503
          333333337333F37333333333055555033333333F73333F733333333055555550
          3333333733333F373333333000050000333333F7777377773333333333050333
          333333FFFF7F7FF33333333333050333333333333F7F73333333333333050333
          333333333F7F73333333333333050333333333333F7F73333333333333050333
          333333333F7F73333333333333000333333333333F7773333333}
        Layout = blGlyphRight
        NumGlyphs = 2
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        Transparent = False
        OnClick = ButtonUpdateClick
      end
    end
  end
  object PanelBookmark: TPanel
    Left = 125
    Top = 0
    Width = 667
    Height = 386
    Align = alClient
    BorderWidth = 2
    TabOrder = 1
    object Label4: TLabel
      Left = 112
      Top = 120
      Width = 32
      Height = 13
      Caption = 'Label4'
    end
    object listviewBookmark: TListView
      Left = 3
      Top = 3
      Width = 661
      Height = 380
      Align = alClient
      Columns = <
        item
          Caption = 'Registry key'
          Width = 240
        end
        item
          Caption = 'Value'
          Width = 100
        end
        item
          AutoSize = True
          Caption = 'Description'
        end>
      DragMode = dmAutomatic
      FullDrag = True
      HideSelection = False
      LargeImages = MainForm.listSmall
      MultiSelect = True
      ReadOnly = True
      RowSelect = True
      PopupMenu = PopupMenuBookmark
      SmallImages = MainForm.listSmall
      SortType = stText
      TabOrder = 0
      ViewStyle = vsReport
      OnColumnClick = listviewBookmarkColumnClick
      OnCompare = listviewBookmarkCompare
      OnDblClick = listviewBookmarkDblClick
      OnEnter = listviewBookmarkEnter
      OnDragDrop = listviewBookmarkDragDrop
      OnDragOver = listviewBookmarkDragOver
      OnKeyDown = listviewBookmarkKeyDown
      OnSelectItem = listviewBookmarkSelectItem
    end
  end
  object PanelCategory: TPanel
    Left = 0
    Top = 0
    Width = 122
    Height = 386
    Align = alLeft
    BorderWidth = 2
    TabOrder = 2
    object TreeViewCategory: TRspTreeView
      Left = 3
      Top = 3
      Width = 116
      Height = 380
      Align = alClient
      DragMode = dmAutomatic
      HideSelection = False
      Images = MainForm.listSmall
      Indent = 19
      ParentShowHint = False
      PopupMenu = PopupMenuCategory
      RightClickSelect = True
      ShowHint = False
      TabOrder = 0
      ToolTips = False
      OnChange = TreeViewCategoryChange
      OnContextPopup = TreeViewCategoryContextPopup
      OnDragDrop = TreeViewCategoryDragDrop
      OnDragOver = TreeViewCategoryDragOver
      OnEdited = TreeViewCategoryEdited
      OnEditing = TreeViewCategoryEditing
      OnEnter = TreeViewCategoryEnter
      OnKeyDown = TreeViewCategoryKeyDown
    end
  end
  object OpenDialogImportBookmarks: TOpenDialog
    DefaultExt = '.ini'
    FileName = '*.rrb;*.ini'
    Filter = 'b'
    Left = 430
    Top = 160
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = 'rrb'
    FileName = '*.rrb'
    Filter = 'bookmark files (*.ini, *.rrb) | *.rrb;*.ini'
    Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
    Left = 412
    Top = 90
  end
  object PopupMenuBookmark: TPopupMenu
    Images = MainForm.ImageListMenu
    OnPopup = PopupMenuBookmarkPopup
    Left = 168
    Top = 44
    object popupJumpTo: TMenuItem
      Caption = '&Jump To'
      ImageIndex = 23
      OnClick = popupJumpToClick
    end
    object popupCopyNameToClipboard: TMenuItem
      Caption = '&Copy name to clipboard'
      ImageIndex = 1
    end
    object popupDelete: TMenuItem
      Caption = '&Delete bookmark'
      ImageIndex = 3
      OnClick = popupDeleteClick
    end
    object popupProperties: TMenuItem
      Caption = '&Properties'
      ImageIndex = 4
      OnClick = popupPropertiesClick
    end
  end
  object regBookmark: TRspReg
    OnFoundData = regBookmarkFoundData
    Key = 2147483647
    RootKey = 2147483647
    RootKeyIndex = rkHKEY_NONE
    AbbreviatedRootKeys = False
    SearchCaseSensitive = False
    SearchPriority = tpNormal
    SearchKeys = False
    SearchValues = False
    SearchData = False
    SearchType = stText
    SearchExpandEnvironment = False
    Left = 304
    Top = 156
  end
  object PopupMenuCategory: TPopupMenu
    OnPopup = PopupMenuCategoryPopup
    Left = 280
    Top = 44
    object popupNewCategory: TMenuItem
      Caption = 'New Category'
      OnClick = popupNewCategoryClick
    end
    object popupDeleteCategory: TMenuItem
      Caption = 'Delete Category'
      ImageIndex = 3
      OnClick = popupDeleteCategoryClick
    end
    object popupRenameCategory: TMenuItem
      Caption = 'Rename Category'
      OnClick = popupRenameCategoryClick
    end
  end
  object popupMenuBookmarkToolbar: TPopupMenu
    MenuAnimation = [maTopToBottom]
    Left = 168
    Top = 102
    object popupToolbarBookmarkAtTop: TMenuItem
      Caption = 'Toolbar at top'
      OnClick = popupToolbarBookmarkAtTopClick
    end
  end
  object FindDialogBookmark: TFindDialog
    Options = [frDown, frHideMatchCase, frHideWholeWord]
    OnFind = FindDialogBookmarkFind
    Left = 516
    Top = 92
  end
  object popupMenuBookmarkExport: TPopupMenu
    Left = 169
    Top = 164
    object mmExportToBookmarkFile: TMenuItem
      Caption = '&Export bookmarks to bookmark file (.rrb, .ini)'
    end
    object mmExportExistingPaths: TMenuItem
      Caption = '&Export existing bookmark paths to registration file (.reg)'
    end
    object mmExportAllPaths: TMenuItem
      Caption = '&Export all bookmark paths to registration file (.reg)'
    end
  end
  object ActionListBookmark: TActionList
    Left = 232
    Top = 416
    object ActionHelp: TAction
      Caption = 'ActionHelp'
      ShortCut = 112
      OnExecute = ActionHelpExecute
    end
    object ActionRename: TAction
      Caption = 'ActionRename'
      ShortCut = 113
      OnExecute = ActionRenameExecute
    end
    object ActionRefresh: TAction
      Caption = 'ActionRefresh'
      ShortCut = 116
      OnExecute = ActionRefreshExecute
    end
    object ActionDelete: TAction
      Caption = 'ActionDelete'
      OnExecute = ActionDeleteExecute
    end
    object ActionSearch: TAction
      Caption = 'ActionSearch'
      ShortCut = 16454
      OnExecute = ActionSearchExecute
    end
    object ActionSelectAll: TAction
      Caption = 'ActionSelectAll'
      ShortCut = 16449
      OnExecute = ActionSelectAllExecute
    end
  end
end