Chip 1997 April/Chip_1997-04_cd.bin/prezent/cb/data.z/BCB.EXE/RCDATA/TENVDIALOG/TENVDIALOG.txt

Text File | 1997-01-16 | 30KB | 1,159 lines

object EnvDialog: TEnvDialog
  Left = 241
  Top = 106
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Environment Options'
  ClientHeight = 371
  ClientWidth = 403
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  PopupMenu = PopupMenu1
  Position = poScreenCenter
  OnCreate = DialogCreate
  OnDestroy = DialogDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 336
    Width = 403
    Height = 35
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object HelpButton: TButton
      Left = 323
      Top = 2
      Width = 75
      Height = 25
      Caption = '&Help'
      TabOrder = 2
      OnClick = HelpButtonClick
    end
    object OKButton: TButton
      Left = 161
      Top = 2
      Width = 75
      Height = 25
      Caption = 'OK'
      Default = True
      ModalResult = 1
      TabOrder = 0
      OnClick = OKButtonClick
    end
    object Button2: TButton
      Left = 242
      Top = 2
      Width = 75
      Height = 25
      Cancel = True
      Caption = 'Cancel'
      ModalResult = 2
      TabOrder = 1
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 403
    Height = 336
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 5
    TabOrder = 0
    object PageControl: TPageControl
      Left = 5
      Top = 5
      Width = 393
      Height = 326
      ActivePage = PalPage
      Align = alClient
      TabOrder = 0
      OnChange = TabControlClick
      OnChanging = TabControlChange
      object PrefPage: TTabSheet
        HelpContext = 1800
        Caption = 'Preferences'
        object gbAutoSave: TGroupBox
          Left = 196
          Top = 8
          Width = 181
          Height = 89
          Caption = 'Autosave options:'
          TabOrder = 1
          object cbASEditor: TCheckBox
            Left = 8
            Top = 16
            Width = 150
            Height = 20
            Caption = 'Editor &files'
            TabOrder = 0
          end
          object cbASDesktop: TCheckBox
            Left = 8
            Top = 36
            Width = 150
            Height = 20
            TabStop = False
            Caption = 'Des&ktop'
            TabOrder = 1
          end
        end
        object gbFormDesigner: TGroupBox
          Left = 8
          Top = 106
          Width = 370
          Height = 82
          Caption = 'Form designer:'
          TabOrder = 2
          object lbGridX: TLabel
            Left = 180
            Top = 19
            Width = 70
            Height = 17
            AutoSize = False
            Caption = 'Grid size &X'
            FocusControl = ecGridSizeX
          end
          object lbGridY: TLabel
            Left = 180
            Top = 39
            Width = 70
            Height = 17
            AutoSize = False
            Caption = 'Grid size &Y'
            FocusControl = ecGridSizeY
          end
          object cbDisplayGrid: TCheckBox
            Left = 8
            Top = 16
            Width = 150
            Height = 20
            Caption = 'Display &grid'
            TabOrder = 0
          end
          object cbSnapToGrid: TCheckBox
            Left = 8
            Top = 36
            Width = 150
            Height = 20
            TabStop = False
            Caption = 'Sna&p to grid'
            TabOrder = 1
          end
          object ecGridSizeX: TEdit
            Left = 252
            Top = 13
            Width = 80
            Height = 21
            TabOrder = 3
          end
          object ecGridSizeY: TEdit
            Left = 252
            Top = 37
            Width = 80
            Height = 21
            TabOrder = 4
          end
          object cbShowComponentCaptions: TCheckBox
            Left = 8
            Top = 56
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'Sho&w component captions'
            TabOrder = 2
          end
        end
        object gbDebugging: TGroupBox
          Left = 8
          Top = 194
          Width = 370
          Height = 87
          Caption = 'Debugging:'
          TabOrder = 3
          object Label2: TLabel
            Left = 8
            Top = 56
            Width = 85
            Height = 17
            AutoSize = False
            Caption = 'Path for &source:'
            FocusControl = ecPathForSource
          end
          object cbIntegratedDebugging: TCheckBox
            Left = 8
            Top = 16
            Width = 150
            Height = 20
            Caption = '&Integrated debugging'
            TabOrder = 0
          end
          object cbBreakOnException: TCheckBox
            Left = 180
            Top = 16
            Width = 150
            Height = 20
            TabStop = False
            Caption = '&Break on exception'
            TabOrder = 2
          end
          object cbMinimizeOnRun: TCheckBox
            Left = 180
            Top = 36
            Width = 169
            Height = 17
            TabStop = False
            Caption = '&Minimize on run'
            TabOrder = 3
          end
          object cbHideDesigners: TCheckBox
            Left = 8
            Top = 36
            Width = 160
            Height = 17
            TabStop = False
            Caption = 'Hide d&esigners on run'
            TabOrder = 1
          end
          object ecPathForSource: TEdit
            Left = 96
            Top = 56
            Width = 265
            Height = 21
            TabOrder = 4
          end
        end
        object gbCompiling: TGroupBox
          Left = 8
          Top = 8
          Width = 185
          Height = 89
          Caption = 'Compiling:'
          TabOrder = 0
          object cbShowProgress: TCheckBox
            Left = 8
            Top = 16
            Width = 165
            Height = 20
            Caption = 'Show &compiler progress'
            TabOrder = 0
          end
          object cbCacheOnStartup: TCheckBox
            Left = 8
            Top = 60
            Width = 165
            Height = 20
            TabStop = False
            Caption = 'Cache &hdrs on startup'
            TabOrder = 2
          end
          object cbCompileBeep: TCheckBox
            Left = 8
            Top = 40
            Width = 169
            Height = 17
            TabStop = False
            Caption = 'Beep on comp&letion'
            TabOrder = 1
          end
        end
      end
      object LibPage: TTabSheet
        HelpContext = 1875
        Caption = 'Library'
        object gbOptions: TGroupBox
          Left = 8
          Top = 120
          Width = 369
          Height = 65
          Caption = 'Options'
          TabOrder = 2
          object cbLibDebugInfo: TCheckBox
            Left = 8
            Top = 20
            Width = 169
            Height = 17
            Caption = 'Build with de&bug info'
            TabOrder = 0
          end
          object cbLibSaveSource: TCheckBox
            Left = 8
            Top = 40
            Width = 161
            Height = 17
            TabStop = False
            Caption = 'Sa&ve library source code'
            TabOrder = 1
          end
          object cbUseIncLink: TCheckBox
            Left = 193
            Top = 20
            Width = 169
            Height = 17
            Caption = 'Use incremen&tal linker'
            TabOrder = 2
          end
          object cbVclDebug: TCheckBox
            Left = 193
            Top = 40
            Width = 161
            Height = 17
            TabStop = False
            Caption = 'Link with deb&ug VCL'
            TabOrder = 3
          end
        end
        object gbMapFile: TGroupBox
          Left = 8
          Top = 8
          Width = 177
          Height = 101
          Caption = 'Map file'
          TabOrder = 0
          object rbMapFileOff: TRadioButton
            Left = 8
            Top = 16
            Width = 121
            Height = 17
            Caption = '&Off'
            TabOrder = 0
            TabStop = True
          end
          object rbMapSegOnly: TRadioButton
            Left = 8
            Top = 36
            Width = 121
            Height = 17
            Caption = '&Segments'
            TabOrder = 1
          end
          object rbMapSegPubs: TRadioButton
            Left = 8
            Top = 56
            Width = 121
            Height = 17
            Caption = '&Publics'
            TabOrder = 2
          end
          object rbMapDetailed: TRadioButton
            Left = 8
            Top = 76
            Width = 121
            Height = 17
            Caption = '&Detailed'
            TabOrder = 3
          end
        end
        object gbMessages: TGroupBox
          Left = 192
          Top = 8
          Width = 185
          Height = 101
          Caption = 'Messages'
          TabOrder = 1
          object cbShowHints: TCheckBox
            Left = 8
            Top = 16
            Width = 121
            Height = 17
            Caption = 'Show hi&nts'
            TabOrder = 0
          end
          object cbShowWarnings: TCheckBox
            Left = 8
            Top = 36
            Width = 121
            Height = 17
            TabStop = False
            Caption = 'Show &warnings'
            TabOrder = 1
          end
        end
        object gbPath: TGroupBox
          Left = 8
          Top = 196
          Width = 369
          Height = 85
          Caption = 'Path'
          TabOrder = 3
          object Label17: TLabel
            Left = 8
            Top = 51
            Width = 81
            Height = 17
            AutoSize = False
            Caption = '&Library path:'
            FocusControl = ecLibraryPath
          end
          object Label1: TLabel
            Left = 8
            Top = 19
            Width = 81
            Height = 17
            AutoSize = False
            Caption = '&Include path:'
            FocusControl = ecIncludePath
          end
          object ecLibraryPath: TComboBox
            Left = 96
            Top = 48
            Width = 257
            Height = 21
            ItemHeight = 0
            TabOrder = 1
          end
          object ecIncludePath: TComboBox
            Left = 96
            Top = 16
            Width = 257
            Height = 21
            ItemHeight = 0
            TabOrder = 0
          end
        end
      end
      object EditorPage: TTabSheet
        HelpContext = 1850
        Caption = 'Editor'
        object lbUndo: TLabel
          Left = 224
          Top = 218
          Width = 74
          Height = 17
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Undo &limit:'
          FocusControl = eoUndoLimit
        end
        object Label5: TLabel
          Left = 56
          Top = 246
          Width = 75
          Height = 17
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Tab stops:'
          FocusControl = eoTabRack
        end
        object lbBlockInd: TLabel
          Left = 40
          Top = 218
          Width = 91
          Height = 17
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Block i&ndent:'
          FocusControl = eoBlockIndent
        end
        object Label6: TLabel
          Left = 24
          Top = 274
          Width = 107
          Height = 17
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'S&yntax extensions:'
          FocusControl = eoHighlightExts
        end
        object Label21: TLabel
          Left = 16
          Top = 10
          Width = 113
          Height = 17
          AutoSize = False
          Caption = 'Editor speed setting:'
          FocusControl = SpeedSetting
        end
        object GroupBox5: TGroupBox
          Left = 8
          Top = 32
          Width = 368
          Height = 175
          Caption = 'Editor options:'
          TabOrder = 1
          object eoIndent: TCheckBox
            Left = 7
            Top = 17
            Width = 150
            Height = 17
            Caption = '&Auto indent mode'
            TabOrder = 0
          end
          object eoInsert: TCheckBox
            Left = 7
            Top = 34
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Insert mode'
            TabOrder = 1
          end
          object eoUseTabChar: TCheckBox
            Left = 7
            Top = 51
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'Use tab cha&racter'
            TabOrder = 2
            OnClick = eoUseTabCharClick
          end
          object eoOptimalFill: TCheckBox
            Left = 7
            Top = 85
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Optimal fill'
            TabOrder = 4
          end
          object eoOutdent: TCheckBox
            Left = 7
            Top = 102
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'Backspace &unindents'
            TabOrder = 5
          end
          object eoCursorInTabs: TCheckBox
            Left = 7
            Top = 119
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Cursor through tabs'
            TabOrder = 6
          end
          object eoGroupUndo: TCheckBox
            Left = 7
            Top = 136
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Group undo'
            TabOrder = 7
          end
          object eoCursorBeyondEOF: TCheckBox
            Left = 7
            Top = 153
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'Cursor beyond &EOF'
            TabOrder = 8
          end
          object eoUndoAfterSave: TCheckBox
            Left = 177
            Top = 17
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'Undo after sa&ve'
            TabOrder = 9
          end
          object eoKeepTrailingBlanks: TCheckBox
            Left = 177
            Top = 34
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Keep trailing blanks'
            TabOrder = 10
          end
          object eoBriefRegExp: TCheckBox
            Left = 177
            Top = 51
            Width = 174
            Height = 17
            TabStop = False
            Caption = '&BRIEF regular expressions'
            TabOrder = 11
          end
          object eoPersistentBlocks: TCheckBox
            Left = 177
            Top = 68
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Persistent blocks'
            TabOrder = 12
          end
          object eoOverwriteBlocks: TCheckBox
            Left = 177
            Top = 85
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'Over&write blocks'
            TabOrder = 13
          end
          object eoDoubleClickLine: TCheckBox
            Left = 177
            Top = 102
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Double click line'
            TabOrder = 14
          end
          object eoFindTextAtCursor: TCheckBox
            Left = 177
            Top = 119
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'Find te&xt at cursor'
            TabOrder = 15
          end
          object eoHighlight: TCheckBox
            Left = 177
            Top = 153
            Width = 178
            Height = 17
            TabStop = False
            Caption = 'Use &syntax highlight'
            TabOrder = 17
          end
          object eoForceCutCopyEnabled: TCheckBox
            Left = 177
            Top = 136
            Width = 182
            Height = 17
            TabStop = False
            Caption = '&Force cut and copy enabled'
            TabOrder = 16
          end
          object eoSmartTab: TCheckBox
            Left = 7
            Top = 68
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'S&mart tab'
            TabOrder = 3
            OnClick = eoSmartTabClick
          end
        end
        object eoBlockIndent: TComboBox
          Left = 136
          Top = 214
          Width = 72
          Height = 21
          ItemHeight = 0
          TabOrder = 2
          OnKeyPress = NumbersOnly
        end
        object eoUndoLimit: TComboBox
          Left = 303
          Top = 214
          Width = 72
          Height = 21
          ItemHeight = 0
          TabOrder = 3
          OnKeyPress = NumbersOnly
        end
        object eoTabRack: TComboBox
          Left = 136
          Top = 242
          Width = 240
          Height = 21
          ItemHeight = 0
          TabOrder = 4
          OnKeyPress = NumsAndDelims
        end
        object eoHighlightExts: TComboBox
          Left = 136
          Top = 270
          Width = 240
          Height = 21
          ItemHeight = 0
          TabOrder = 5
        end
        object SpeedSetting: TComboBox
          Left = 136
          Top = 6
          Width = 240
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          Items.Strings = (
            'Default keymapping'
            'IDE classic'
            'BRIEF emulation'
            'Epsilon emulation')
          TabOrder = 0
          OnChange = EditorSpeedClick
          OnClick = EditorSpeedClick
        end
      end
      object EdDispPage: TTabSheet
        HelpContext = 2075
        Caption = 'Display'
        object Label4: TLabel
          Left = 8
          Top = 174
          Width = 65
          Height = 17
          AutoSize = False
          Caption = 'Editor &font:'
          FocusControl = FontName
        end
        object Label7: TLabel
          Left = 278
          Top = 174
          Width = 33
          Height = 17
          AutoSize = False
          Caption = '&Size:'
          FocusControl = FontSize
        end
        object Label11: TLabel
          Left = 8
          Top = 72
          Width = 150
          Height = 17
          AutoSize = False
          Caption = '&Keystroke mapping:'
          FocusControl = eoBindingList
        end
        object Label16: TLabel
          Left = 8
          Top = 195
          Width = 38
          Height = 13
          Caption = 'Sample:'
        end
        object GroupBox11: TGroupBox
          Left = 196
          Top = 72
          Width = 180
          Height = 85
          TabOrder = 2
          object lbRightMargin: TLabel
            Left = 10
            Top = 41
            Width = 79
            Height = 17
            AutoSize = False
            Caption = 'Right &margin:'
            FocusControl = eoRightMargin
          end
          object eoLineOnMargin: TCheckBox
            Left = 11
            Top = 14
            Width = 138
            Height = 20
            Caption = '&Visible right margin'
            TabOrder = 0
            OnClick = LineOnMarginClick
          end
          object eoRightMargin: TComboBox
            Left = 94
            Top = 38
            Width = 63
            Height = 21
            ItemHeight = 0
            TabOrder = 1
            Text = 'eoRightMargin'
          end
        end
        object GroupBox10: TGroupBox
          Left = 8
          Top = 8
          Width = 368
          Height = 57
          Caption = 'Display and file options:'
          TabOrder = 0
          object eoBriefCursors: TCheckBox
            Left = 7
            Top = 16
            Width = 150
            Height = 17
            Caption = 'BRIEF &cursor shapes'
            TabOrder = 0
          end
          object eoCreateBackup: TCheckBox
            Left = 7
            Top = 34
            Width = 150
            Height = 17
            TabStop = False
            Caption = 'Create &backup file'
            TabOrder = 1
          end
          object eoPreserveLineEnds: TCheckBox
            Left = 185
            Top = 16
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Preserve line ends'
            TabOrder = 2
          end
          object eoFullZoom: TCheckBox
            Left = 185
            Top = 34
            Width = 150
            Height = 17
            TabStop = False
            Caption = '&Zoom to full screen'
            TabOrder = 3
          end
        end
        object FontName: TComboBox
          Left = 78
          Top = 170
          Width = 186
          Height = 21
          Style = csDropDownList
          ItemHeight = 0
          TabOrder = 3
          OnClick = FontNameClicked
        end
        object FontSize: TComboBox
          Left = 312
          Top = 170
          Width = 63
          Height = 21
          ItemHeight = 0
          TabOrder = 4
          OnClick = FontSizeClicked
        end
        object eoBindingList: TListBox
          Left = 8
          Top = 90
          Width = 177
          Height = 66
          ItemHeight = 13
          Items.Strings = (
            'Default'
            'Classic'
            'Brief'
            'Epsilon')
          TabOrder = 1
        end
        object FontSample: TPanel
          Left = 8
          Top = 210
          Width = 369
          Height = 55
          BevelOuter = bvLowered
          Caption = 'AbBbXxZz'
          TabOrder = 5
        end
      end
      object EdColorPage: TTabSheet
        HelpContext = 1950
        Caption = 'Colors'
        object Label8: TLabel
          Left = 8
          Top = 32
          Width = 73
          Height = 17
          AutoSize = False
          Caption = '&Element:'
          FocusControl = ElementList
        end
        object Label9: TLabel
          Left = 138
          Top = 32
          Width = 63
          Height = 17
          AutoSize = False
          Caption = '&Color:'
          FocusControl = ColorGrid
        end
        object EditControlHere: TLabel
          Left = 8
          Top = 176
          Width = 369
          Height = 116
          AutoSize = False
          OnClick = SampleClick
        end
        object Label22: TLabel
          Left = 16
          Top = 10
          Width = 113
          Height = 17
          AutoSize = False
          Caption = 'Color &speed setting:'
          FocusControl = ColorSpeedSetting
        end
        object ElementList: TListBox
          Left = 8
          Top = 47
          Width = 120
          Height = 121
          IntegralHeight = True
          ItemHeight = 13
          Items.Strings = (
            'Whitespace'
            'Comment'
            'Reserved word'
            'Identifier'
            'Symbol'
            'String'
            'Integer'
            'Float'
            'Octal'
            'Hex'
            'Character'
            'Preprocessor'
            'Illegal Char'
            'Plain text'
            'Marked block'
            'Search match'
            'Execution point'
            'Enabled break'
            'Disabled break'
            'Invalid break'
            'Error line'
            'Right margin')
          TabOrder = 1
          OnClick = ElementListClick
        end
        object GroupBox6: TGroupBox
          Left = 263
          Top = 31
          Width = 114
          Height = 72
          Caption = 'Text attributes:'
          TabOrder = 2
          object Bold: TCheckBox
            Left = 8
            Top = 16
            Width = 100
            Height = 17
            Caption = '&Bold'
            TabOrder = 0
            OnClick = FontClick
          end
          object Italic: TCheckBox
            Left = 8
            Top = 34
            Width = 100
            Height = 17
            TabStop = False
            Caption = '&Italic'
            TabOrder = 1
            OnClick = FontClick
          end
          object Underline: TCheckBox
            Left = 8
            Top = 51
            Width = 100
            Height = 17
            TabStop = False
            Caption = '&Underline'
            TabOrder = 2
            OnClick = FontClick
          end
        end
        object GroupBox7: TGroupBox
          Left = 263
          Top = 108
          Width = 114
          Height = 60
          Caption = 'Use defaults for:'
          TabOrder = 3
          object DefaultFore: TCheckBox
            Left = 8
            Top = 15
            Width = 90
            Height = 17
            Caption = '&Foreground'
            TabOrder = 0
            OnClick = DefaultClick
          end
          object DefaultBack: TCheckBox
            Left = 8
            Top = 35
            Width = 90
            Height = 17
            TabStop = False
            Caption = 'Back&ground'
            TabOrder = 1
            OnClick = DefaultClick
          end
        end
        object ColorSpeedSetting: TComboBox
          Left = 132
          Top = 6
          Width = 245
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          Items.Strings = (
            'Defaults'
            'Classic'
            'Twilight'
            'Ocean')
          TabOrder = 0
          OnClick = ColorSpeedClick
        end
        object ColorGrid: TColorGrid
          Left = 136
          Top = 48
          Width = 120
          Height = 120
          ClickEnablesColor = True
          TabOrder = 4
          OnChange = ColorClick
        end
      end
      object PalPage: TTabSheet
        HelpContext = 2000
        Caption = 'Palette'
        object PageLabel: TLabel
          Left = 10
          Top = 12
          Width = 63
          Height = 17
          AutoSize = False
          Caption = '&Pages:'
          FocusControl = PageListBox
        end
        object ToolLabel: TLabel
          Left = 222
          Top = 12
          Width = 105
          Height = 17
          AutoSize = False
          Caption = '&Components:'
          FocusControl = ToolListBox
        end
        object PageListBox: TListBox
          Left = 10
          Top = 29
          Width = 113
          Height = 212
          IntegralHeight = True
          ItemHeight = 13
          TabOrder = 0
          OnClick = PageClick
          OnDragDrop = PageDragDrop
          OnDragOver = PageDragOver
          OnEnter = PagesGotFocus
          OnKeyDown = ListKeyDown
          OnMouseDown = PageMouseDown
        end
        object MoveUp: TBitBtn
          Left = 144
          Top = 36
          Width = 23
          Height = 23
          TabOrder = 1
          OnClick = MoveClick
          Glyph.Data = {
            4A010000424D4A01000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333333333333333338888833333333334444483333333333CCCC483
            333333333CCCC483333333333CCCC483333333333CCCC483333333333CCCC488
            8333333CCCCCCCCC33333333CCCCCCC3333333333CCCCC333333333333CCC333
            33333333333C3333333333333333333333333333333333333333000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            000000000000000000000000000000000000696420627265616B706F696E7420
            0000000000000000000000000000}
        end
        object MoveDn: TBitBtn
          Left = 176
          Top = 36
          Width = 23
          Height = 23
          TabOrder = 2
          OnClick = MoveClick
          Glyph.Data = {
            4A010000424D4A01000000000000760000002800000010000000100000000100
            0400000000008000000000000000000000000000000000000000000000000000
            80000080000000808000800000008000800080800000C0C0C000808080000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
            333333333333833333333333333488333333333333CC4883333333333CCCC488
            33333333CCCCCC488333333CCCCCC444333333333CCCC483333333333CCCC483
            333333333CCCC483333333333CCCC483333333333CCCC483333333333CCCC433
            3333333333333333333333333333333333333333333333333333000000000000
            0000000000000000000000000000000000000000000000000000000000000000
            000000000000000000000000000000000000003FB44444444444444FB0000000
            0000000000000000000000000000}
        end
        object ToolListBox: TListBox
          Left = 222
          Top = 28
          Width = 152
          Height = 214
          IntegralHeight = True
          ItemHeight = 30
          Style = lbOwnerDrawFixed
          TabOrder = 3
          OnDragDrop = ToolDragDrop
          OnDragOver = ToolDragOver
          OnDrawItem = ToolDrawItem
          OnEnter = ToolsGotFocus
          OnKeyDown = ListKeyDown
          OnMouseDown = ToolMouseDown
        end
        object AddButton: TButton
          Left = 135
          Top = 76
          Width = 75
          Height = 25
          Caption = '&Add...'
          TabOrder = 4
          OnClick = AddClick
        end
        object DeleteButton: TButton
          Left = 135
          Top = 108
          Width = 75
          Height = 25
          Caption = '&Delete'
          TabOrder = 5
          OnClick = DeleteClick
        end
        object RenameButton: TButton
          Left = 135
          Top = 140
          Width = 75
          Height = 25
          Caption = '&Rename...'
          TabOrder = 6
          OnClick = RenameClick
        end
        object ResetPaletteBtn: TButton
          Left = 112
          Top = 255
          Width = 125
          Height = 25
          Caption = 'Re&set defaults'
          TabOrder = 7
          OnClick = ResetPalette
        end
      end
    end
  end
  object PopupMenu1: TPopupMenu
    AutoPopup = False
    Left = 24
    Top = 336
    object dNextPage: TMenuItem
      Caption = 'Next Page'
      ShortCut = 0
      Visible = False
      OnClick = NextPageClick
    end
    object dPrevPage: TMenuItem
      Caption = 'Prev Page'
      ShortCut = 0
      Visible = False
      OnClick = PreviousPageClick
    end
  end
end