object DlgOptions: TDlgOptions
  Left = 233
  Top = 199
  Width = 369
  Height = 276
  BorderIcons = [biSystemMenu]
  Caption = 'Preferences'
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  FormStyle = fsStayOnTop
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object tbnPrefs: TTabbedNotebook
    Left = 8
    Top = 8
    Width = 257
    Height = 233
    TabFont.Color = clBtnText
    TabFont.Height = -11
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 0
    object TTabPage
      Left = 4
      Top = 24
      Caption = '&Program'
      object GroupBox1: TGroupBox
        Left = 8
        Top = 8
        Width = 229
        Height = 185
        Caption = 'Options'
        TabOrder = 0
        object CBStayOnTop: TCheckBox
          Left = 16
          Top = 16
          Width = 161
          Height = 17
          Hint = 'When checked, program stays on top of the others'
          Caption = 'Stay On &Top'
          TabOrder = 0
        end
        object CBLargeButtons: TCheckBox
          Left = 16
          Top = 40
          Width = 177
          Height = 17
          Hint = 'When checked, uses large buttons on tool bar'
          Caption = 'Use &Large Buttons'
          TabOrder = 1
        end
        object CBHideButtons: TCheckBox
          Left = 16
          Top = 88
          Width = 169
          Height = 17
          Hint = 'When checked, hides button bar'
          Caption = '&Hide Toolbar'
          TabOrder = 3
        end
        object CBHideStatus: TCheckBox
          Left = 16
          Top = 112
          Width = 177
          Height = 17
          Hint = 'When checked, hides hint bar'
          Caption = 'Hide &Status Line'
          TabOrder = 4
        end
        object CBAutoLoad: TCheckBox
          Left = 16
          Top = 136
          Width = 169
          Height = 17
          Hint = 'When checked, automatically opens files at start up'
          Caption = '&Auto Load Files'
          TabOrder = 5
        end
        object CBKeepPos: TCheckBox
          Left = 16
          Top = 159
          Width = 185
          Height = 14
          Hint = 'When checked, restores program window to its last position'
          Caption = 'Auto Save P&osition'
          TabOrder = 6
        end
        object CBHideMenu: TCheckBox
          Left = 16
          Top = 64
          Width = 169
          Height = 17
          Hint = 'When checked, hides main program menu'
          Caption = 'Hide &Menu'
          TabOrder = 2
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 24
      Caption = 'Default &Document'
      object lbledtSample: TEnhLabel
        Left = 8
        Top = 95
        Width = 75
        Height = 13
        Caption = 'Sample Font:'
        FocusControl = edtSample
      end
      object lbledtTabWidth: TEnhLabel
        Left = 160
        Top = 1
        Width = 64
        Height = 13
        Caption = 'Tab &Width:'
        FocusControl = edtTabWidth
      end
      object CheckGroupBox: TGroupBox
        Left = 8
        Top = 8
        Width = 137
        Height = 73
        Caption = 'Options'
        TabOrder = 0
        object CBWordWrap: TCheckBox
          Left = 8
          Top = 20
          Width = 121
          Height = 17
          Hint = 'When checked, enabled word wrap in editor window'
          Caption = '&Word Wrap'
          TabOrder = 0
        end
        object CBDosText: TCheckBox
          Left = 8
          Top = 44
          Width = 121
          Height = 17
          Hint = 
            'When checked, assumes that files being opened use the ASCII char' +
            'acter set'
          Caption = '&Dos ASCII Text'
          TabOrder = 1
        end
      end
      object BBFont: TBitBtn
        Left = 160
        Top = 110
        Width = 77
        Height = 27
        Hint = '|Opens Font dialog box'
        Caption = '&Font'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = BBFontClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00000000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333333333333333FFF33FFFFF33333300033000
          00333337773377777333333330333300033333337FF33777F333333330733300
          0333333377FFF777F33333333700000073333333777777773333333333033000
          3333333337FF777F333333333307300033333333377F777F3333333333703007
          33333333377F7773333333333330000333333333337777F33333333333300003
          33333333337777F3333333333337007333333333337777333333333333330033
          3333333333377333333333333333033333333333333733333333333333333333
          3333333333333333333333333333333333333333333333333333}
        Margin = 2
        NumGlyphs = 2
        Spacing = -1
      end
      object edtSample: TLblMemo
        Left = 8
        Top = 110
        Width = 137
        Height = 83
        Hint = 'Preview current font selection'
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Courier New'
        Font.Style = []
        Lines.Strings = (
          'ABCDEFGHIJKLMNOPQRSTUWWXYZ'
          '1234567890'
          'Test Current Font')
        ParentFont = False
        PopupMenu = ef_InputBoxMenu
        TabOrder = 3
        WordWrap = False
        OverwriteMode = False
        UndoWhenEsc = False
        LabelText = 'Sample Font'
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbledtSample
        LabelRelLeft = 0
        LabelRelTop = -15
      end
      object edtTabWidth: TLblEdit
        Left = 160
        Top = 16
        Width = 77
        Height = 21
        Hint = '|Width of tab settings in pixels'
        MaxLength = 3
        PopupMenu = ef_InputBoxMenu
        TabOrder = 1
        OnKeyPress = edtTabWidthKeyPress
        OverwriteMode = False
        UndoWhenEsc = False
        WordWrap = False
        LabelText = 'Tab &Width'
        LabelPos = lpTop
        LabelMargin = 2
        LabelComponent = lbledtTabWidth
        LabelRelLeft = 0
        LabelRelTop = -15
      end
    end
  end
  object OKBtn: TBitBtn
    Left = 272
    Top = 182
    Width = 81
    Height = 27
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = OKBtnClick
    Kind = bkOK
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object CancelBtn: TBitBtn
    Left = 272
    Top = 214
    Width = 81
    Height = 27
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    Kind = bkCancel
    Margin = 2
    Spacing = -1
    IsControl = True
  end
  object InputBoxMaster1: TInputBoxMaster
    InputBoxMenu = ef_InputBoxMenu
    OverwriteMode = False
    UseContextMenu = True
    Left = 280
    Top = 96
  end
  object ef_InputBoxMenu: TInputBoxMenu
    Left = 312
    Top = 96
    object ef_InputBoxMenu_Undo: TMenuItem
      Caption = '&Undo'
      Hint = 'Undo changes to input text'
      ShortCut = 0
    end
    object ef_InputBoxMenu_Overwrite: TMenuItem
      Tag = 1
      Caption = '&Overwrite Mode'
      Hint = 'Toggle Insert/Overwrite mode'
      ShortCut = 0
    end
    object ef_InputBoxMenu_Break1: TMenuItem
      Tag = 2
      Caption = '-'
      ShortCut = 0
    end
    object ef_InputBoxMenu_Cut: TMenuItem
      Tag = 3
      Caption = 'Cu&t'
      Hint = 'Cut selected text to clipboard'
      ShortCut = 0
    end
    object ef_InputBoxMenu_Copy: TMenuItem
      Tag = 4
      Caption = '&Copy'
      Hint = 'Copy selected text to clipboard'
      ShortCut = 0
    end
    object ef_InputBoxMenu_Paste: TMenuItem
      Tag = 5
      Caption = '&Paste'
      Hint = 'Paste text from clipboard to input box'
      ShortCut = 0
    end
    object ef_InputBoxMenu_Delete: TMenuItem
      Tag = 6
      Caption = '&Delete'
      Hint = 'Delete selected text'
      ShortCut = 0
    end
    object ef_InputBoxMenu_Clear: TMenuItem
      Tag = 7
      Caption = 'C&lear All'
      Hint = 'Clear all text from input box'
      ShortCut = 0
    end
    object ef_InputBoxMenu_Break2: TMenuItem
      Tag = 8
      Caption = '-'
      ShortCut = 0
    end
    object ef_InputBoxMenu_SelectAll: TMenuItem
      Tag = 9
      Caption = 'Select &All'
      Hint = 'Select all text in input box'
      ShortCut = 0
    end
  end
  object MyFontDlg1: TMyFontDlg
    FontName = 'MS Sans Serif'
    Left = 280
    Top = 126
  end
end