lazarus-ccr/applications/khexeditor/options.lfm

object OptionsForm: TOptionsForm
  Left = 1101
  Height = 363
  Top = 773
  Width = 437
  BorderStyle = bsDialog
  Caption = 'Editor options'
  ClientHeight = 363
  ClientWidth = 437
  Font.Height = -11
  Font.Name = 'Tahoma'
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  Position = poScreenCenter
  LCLVersion = '0.9.29'
  object PCMain: TPageControl
    Left = 8
    Height = 320
    Top = 8
    Width = 425
    ActivePage = TSEditorFont
    TabIndex = 1
    TabOrder = 0
    object TSEditorOptions: TTabSheet
      Caption = 'Editor Options'
      ClientHeight = 294
      ClientWidth = 417
      object LBAddressPrefix: TLabel
        Left = 212
        Height = 14
        Top = 69
        Width = 75
        Caption = 'Address prefix:'
        FocusControl = EDAddressPrefix
        ParentColor = False
      end
      object LBAddressSize: TLabel
        Left = 212
        Height = 14
        Top = 93
        Width = 65
        Caption = 'Address size:'
        FocusControl = EDAddressSize
        ParentColor = False
      end
      object LBCharSpacing: TLabel
        Left = 212
        Height = 14
        Top = 117
        Width = 118
        Caption = 'Inter-character spacing:'
        FocusControl = EDCharSpacing
        ParentColor = False
      end
      object LBDigitGrouping: TLabel
        Left = 212
        Height = 14
        Top = 165
        Width = 71
        Caption = 'Digit grouping:'
        FocusControl = EDDigitGrouping
        ParentColor = False
      end
      object LBLineSize: TLabel
        Left = 212
        Height = 14
        Top = 141
        Width = 45
        Caption = 'Line size:'
        FocusControl = EDLineSize
        ParentColor = False
      end
      object LBbytes: TLabel
        Left = 381
        Height = 14
        Top = 141
        Width = 28
        Caption = 'bytes'
        ParentColor = False
      end
      object LBpoints: TLabel
        Left = 381
        Height = 14
        Top = 118
        Width = 30
        Caption = 'points'
        ParentColor = False
      end
      object LBbytes2: TLabel
        Left = 381
        Height = 14
        Top = 165
        Width = 28
        Caption = 'bytes'
        ParentColor = False
      end
      object LBLineHeightPercent: TLabel
        Left = 212
        Height = 14
        Top = 189
        Width = 115
        Caption = 'Line height percentage:'
        FocusControl = EDLineHeightPercent
        ParentColor = False
      end
      object LBpercent: TLabel
        Left = 381
        Height = 14
        Top = 189
        Width = 12
        Caption = '%'
        ParentColor = False
      end
      object LBUndoLimit: TLabel
        Left = 212
        Height = 14
        Top = 213
        Width = 51
        Caption = 'Undo limit:'
        FocusControl = EDUndoLimit
        ParentColor = False
      end
      object GBGeneral: TGroupBox
        Left = 4
        Height = 69
        Top = 2
        Width = 201
        Caption = 'General'
        ClientHeight = 51
        ClientWidth = 197
        TabOrder = 0
        object CBDropFiles: TCheckBox
          Left = 8
          Height = 17
          Top = 0
          Width = 63
          Caption = 'Drop files'
          TabOrder = 0
        end
        object CBUndoAfterSave: TCheckBox
          Left = 8
          Height = 17
          Top = 32
          Width = 96
          Caption = 'Undo after save'
          TabOrder = 2
        end
        object CBGroupUndo: TCheckBox
          Left = 8
          Height = 17
          Top = 16
          Width = 74
          Caption = 'Group undo'
          TabOrder = 1
        end
      end
      object RGAddressMode: TRadioGroup
        Left = 212
        Height = 45
        Top = 6
        Width = 201
        AutoFill = True
        Caption = 'Address mode'
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.TopBottomSpacing = 6
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 2
        ClientHeight = 27
        ClientWidth = 197
        Columns = 2
        Items.Strings = (
          'Decimal'
          'Hexadecimal'
        )
        TabOrder = 3
      end
      object RGDisabledDrawStyle: TRadioGroup
        Left = 4
        Height = 83
        Top = 207
        Width = 201
        AutoFill = True
        Caption = 'Draw style when disabled'
        ChildSizing.LeftRightSpacing = 6
        ChildSizing.TopBottomSpacing = 6
        ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
        ChildSizing.EnlargeVertical = crsHomogenousChildResize
        ChildSizing.ShrinkHorizontal = crsScaleChilds
        ChildSizing.ShrinkVertical = crsScaleChilds
        ChildSizing.Layout = cclLeftToRightThenTopToBottom
        ChildSizing.ControlsPerLine = 1
        ClientHeight = 65
        ClientWidth = 197
        Items.Strings = (
          'Brighter colors'
          'Gray and white'
          'Normal colors'
        )
        TabOrder = 2
      end
      object GBAppearance: TGroupBox
        Left = 4
        Height = 133
        Top = 72
        Width = 201
        Caption = 'Appearance'
        ClientHeight = 115
        ClientWidth = 197
        TabOrder = 1
        object CBShowAddress: TCheckBox
          Left = 8
          Height = 17
          Top = 2
          Width = 110
          Caption = 'Show address area'
          TabOrder = 0
        end
        object CBShowDigits: TCheckBox
          Left = 8
          Height = 17
          Top = 18
          Width = 92
          Caption = 'Show digit area'
          TabOrder = 1
        end
        object CBShowText: TCheckBox
          Left = 8
          Height = 17
          Top = 34
          Width = 92
          Caption = 'Show text area'
          TabOrder = 2
        end
        object CBShowHorzLines: TCheckBox
          Left = 8
          Height = 17
          Top = 50
          Width = 118
          Caption = 'Show horizontal lines'
          TabOrder = 3
        end
        object CBShowVertLines: TCheckBox
          Left = 8
          Height = 17
          Top = 66
          Width = 106
          Caption = 'Show vertical lines'
          TabOrder = 4
        end
        object CBShowSeparators: TCheckBox
          Left = 8
          Height = 17
          Top = 82
          Width = 124
          Caption = 'Show area separators'
          TabOrder = 5
        end
        object CBShowInactiveCaret: TCheckBox
          Left = 8
          Height = 17
          Top = 98
          Width = 112
          Caption = 'Show inactive caret'
          TabOrder = 6
        end
      end
      object EDAddressPrefix: TEdit
        Left = 328
        Height = 21
        Top = 66
        Width = 49
        TabOrder = 4
      end
      object EDAddressSize: TEdit
        Left = 344
        Height = 21
        Top = 90
        Width = 33
        TabOrder = 5
      end
      object EDCharSpacing: TEdit
        Left = 344
        Height = 21
        Top = 114
        Width = 33
        TabOrder = 6
      end
      object EDDigitGrouping: TEdit
        Left = 344
        Height = 21
        Top = 162
        Width = 33
        TabOrder = 7
      end
      object EDLineSize: TEdit
        Left = 344
        Height = 21
        Top = 138
        Width = 33
        TabOrder = 8
      end
      object EDLineHeightPercent: TEdit
        Left = 344
        Height = 21
        Top = 186
        Width = 33
        TabOrder = 9
      end
      object EDUndoLimit: TEdit
        Left = 328
        Height = 21
        Top = 210
        Width = 49
        TabOrder = 10
      end
    end
    object TSEditorFont: TTabSheet
      Caption = 'Editor Font'
      ClientHeight = 294
      ClientWidth = 417
      ImageIndex = 2
      object LBFontName: TLabel
        Left = 16
        Height = 14
        Top = 16
        Width = 56
        Caption = '&Font name:'
        FocusControl = CoBFontName
        ParentColor = False
      end
      object LBSample: TLabel
        Left = 16
        Height = 14
        Top = 120
        Width = 39
        Caption = 'Sample:'
        FocusControl = PNFontSample
        ParentColor = False
      end
      object LBFontSize: TLabel
        Left = 315
        Height = 14
        Top = 34
        Width = 48
        Alignment = taRightJustify
        Caption = 'Font size:'
        FocusControl = EDFontSize
        ParentColor = False
      end
      object CoBFontName: TComboBox
        Left = 16
        Height = 21
        Top = 32
        Width = 201
        ItemHeight = 13
        OnExit = CoBFontNameClick
        OnSelect = CoBFontNameClick
        Style = csDropDownList
        TabOrder = 0
      end
      object PNFontSample: TPanel
        Left = 16
        Height = 105
        Top = 136
        Width = 385
        BevelOuter = bvLowered
        Caption = 'AaBbCcXxYyZz'
        TabOrder = 1
      end
      object EDFontSize: TEdit
        Left = 368
        Height = 21
        Top = 31
        Width = 33
        OnExit = EDFontSizeExit
        TabOrder = 2
      end
      object CBFontStyleBold: TCheckBox
        Left = 16
        Height = 17
        Top = 64
        Width = 38
        Caption = 'Bold'
        OnClick = CoBFontNameClick
        TabOrder = 3
      end
      object CBFontStyleItalic: TCheckBox
        Left = 16
        Height = 17
        Top = 88
        Width = 41
        Caption = 'Italic'
        OnClick = CoBFontNameClick
        TabOrder = 4
      end
    end
    object TSColors: TTabSheet
      Caption = 'Colors'
      ClientHeight = 294
      ClientWidth = 417
      ImageIndex = 1
      object LBAttributes: TLabel
        Left = 8
        Height = 14
        Top = 8
        Width = 53
        Caption = 'Color item:'
        FocusControl = LiBColors
        ParentColor = False
      end
      object LiBColors: TListBox
        Left = 8
        Height = 233
        Top = 24
        Width = 209
        ItemHeight = 13
        OnClick = LiBColorsClick
        OnDrawItem = LiBColorsDrawItem
        OnMouseMove = LiBColorsMouseMove
        Style = lbOwnerDrawFixed
        TabOrder = 0
      end
      object GBColors: TGroupBox
        Left = 224
        Height = 95
        Top = 19
        Width = 185
        Caption = 'Color assignment'
        ClientHeight = 77
        ClientWidth = 181
        TabOrder = 1
        object LBHighFG: TLabel
          Left = 10
          Height = 14
          Top = 18
          Width = 68
          Caption = 'Current color:'
          ParentColor = False
        end
        object SHColor: TShape
          Left = 112
          Height = 49
          Top = 16
          Width = 65
        end
        object BUColorChange: TButton
          Left = 8
          Height = 25
          Top = 40
          Width = 75
          Caption = 'Change...'
          OnClick = BUColorChangeClick
          TabOrder = 0
        end
      end
    end
  end
  object BUOk: TButton
    Left = 275
    Height = 25
    Top = 333
    Width = 75
    Caption = '&OK'
    Default = True
    ModalResult = 1
    TabOrder = 2
  end
  object BuCancel: TButton
    Left = 358
    Height = 25
    Top = 333
    Width = 75
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 3
  end
  object BUDefault: TButton
    Left = 8
    Height = 25
    Top = 333
    Width = 75
    Caption = 'Defaults'
    OnClick = BUDefaultClick
    TabOrder = 1
  end
  object CDChange: TColorDialog
    Color = clBlack
    CustomColors.Strings = (
      'ColorA=000000'
      'ColorB=000080'
      'ColorC=008000'
      'ColorD=008080'
      'ColorE=800000'
      'ColorF=800080'
      'ColorG=808000'
      'ColorH=808080'
      'ColorI=C0C0C0'
      'ColorJ=0000FF'
      'ColorK=00FF00'
      'ColorL=00FFFF'
      'ColorM=FF0000'
      'ColorN=FF00FF'
      'ColorO=FFFF00'
      'ColorP=FFFFFF'
      'ColorQ=C0DCC0'
      'ColorR=F0CAA6'
      'ColorS=F0FBFF'
      'ColorT=A4A0A0'
    )
    left = 404
  end
end