Chip 2001 January/chipcd20010102.iso/software/internet/acehtml/AceHTML4Free.exe/%MAINDIR%/AceHTMLFree.exe/0/RCDATA/TOPTIONSDIALOG/TOPTIONSDIALOG.txt

Text File | 2000-11-22 | 24.2 KB | 964 lines

object OptionsDialog: TOptionsDialog
  Left = 242
  Top = 98
  BorderIcons = [biSystemMenu, biHelp]
  BorderStyle = bsSingle
  Caption = 'Editor options'
  ClientHeight = 398
  ClientWidth = 442
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = True
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel2: TPanel
    Left = 0
    Top = 363
    Width = 442
    Height = 35
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object OKButton: TButton
      Left = 206
      Top = 8
      Width = 72
      Height = 22
      HelpContext = 49
      TabOrder = 0
      OnClick = OKButtonClick
    end
    object CancelButton: TButton
      Left = 286
      Top = 8
      Width = 72
      Height = 22
      HelpContext = 44
      Cancel = True
      ModalResult = 2
      TabOrder = 1
    end
    object BtnHelp: TButton
      Left = 366
      Top = 8
      Width = 72
      Height = 22
      HelpContext = 7
      TabOrder = 2
      OnClick = BtnHelpClick
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 442
    Height = 363
    ActivePage = OptionsPage
    Align = alClient
    TabOrder = 1
    object OptionsPage: TTabSheet
      Caption = 'Options'
      object Label7: TLabel
        Left = 323
        Top = 324
        Width = 59
        Height = 13
        Caption = 'Right margin'
        Visible = False
      end
      object GroupBox4: TGroupBox
        Left = 8
        Top = 8
        Width = 417
        Height = 119
        TabOrder = 0
        object Label16: TLabel
          Left = 212
          Top = 19
          Width = 3
          Height = 13
        end
        object DispWrapBox: TCheckBox
          Left = 213
          Top = 51
          Width = 200
          Height = 17
          HelpContext = 1044
          TabOrder = 7
          OnClick = DispWrapBoxClick
        end
        object AutoIndentBox: TCheckBox
          Left = 8
          Top = 19
          Width = 200
          Height = 17
          HelpContext = 928
          TabOrder = 0
          OnClick = SHIFTSelectBoxClick
        end
        object TabColBox: TCheckBox
          Left = 8
          Top = 35
          Width = 200
          Height = 17
          HelpContext = 699
          Caption = 'Smart tabs'
          TabOrder = 1
          OnClick = SHIFTSelectBoxClick
        end
        object WrapOverrideBox: TCheckBox
          Left = 152
          Top = 9
          Width = 200
          Height = 17
          Caption = 'Override wrapping'
          TabOrder = 12
          Visible = False
          OnClick = SHIFTSelectBoxClick
        end
        object WordSelectBox: TCheckBox
          Left = 8
          Top = 67
          Width = 200
          Height = 17
          HelpContext = 929
          TabOrder = 3
          OnClick = SHIFTSelectBoxClick
        end
        object PrnSynHighlightBox: TCheckBox
          Left = 8
          Top = 83
          Width = 200
          Height = 17
          HelpContext = 932
          TabOrder = 4
          OnClick = SHIFTSelectBoxClick
        end
        object TitleAsFilenameBox: TCheckBox
          Left = 158
          Top = 13
          Width = 200
          Height = 17
          Caption = 'Title as filename'
          TabOrder = 13
          Visible = False
          OnClick = SHIFTSelectBoxClick
        end
        object BlockCursorBox: TCheckBox
          Left = 158
          Top = 11
          Width = 200
          Height = 17
          Caption = 'Block cursor for Overwrite'
          TabOrder = 14
          Visible = False
          OnClick = SHIFTSelectBoxClick
        end
        object MarkWrapBox: TCheckBox
          Left = 213
          Top = 83
          Width = 202
          Height = 17
          HelpContext = 930
          TabOrder = 10
          OnClick = SHIFTSelectBoxClick
        end
        object SmartFillBox: TCheckBox
          Left = 8
          Top = 51
          Width = 200
          Height = 17
          HelpContext = 700
          Caption = 'Smart fill'
          TabOrder = 2
          OnClick = SHIFTSelectBoxClick
        end
        object UseTabBox: TCheckBox
          Left = 149
          Top = 11
          Width = 200
          Height = 17
          Caption = 'Use TAB character'
          TabOrder = 15
          Visible = False
          OnClick = SHIFTSelectBoxClick
        end
        object WrapColumnBox: TEdit
          Left = 376
          Top = 15
          Width = 30
          Height = 21
          HelpContext = 1043
          TabOrder = 6
          OnExit = WrapColumnBoxExit
          OnKeyDown = WrapColumnBoxKeyDown
        end
        object ShowWrapColumnBox: TCheckBox
          Left = 157
          Top = 11
          Width = 202
          Height = 17
          TabOrder = 9
          Visible = False
          OnClick = SHIFTSelectBoxClick
        end
        object EdLineNosBox: TCheckBox
          Left = 213
          Top = 67
          Width = 200
          Height = 17
          HelpContext = 1213
          TabOrder = 8
          OnClick = SHIFTSelectBoxClick
        end
        object CursorAfterEOLBox: TCheckBox
          Left = 8
          Top = 99
          Width = 200
          Height = 17
          HelpContext = 1212
          TabOrder = 5
          OnClick = SHIFTSelectBoxClick
        end
        object ShowAllCharsBox: TCheckBox
          Left = 213
          Top = 99
          Width = 202
          Height = 17
          HelpContext = 620
          Caption = 'Show All Chars Box'
          TabOrder = 11
          OnClick = SHIFTSelectBoxClick
        end
      end
      object GroupBox2: TGroupBox
        Left = 8
        Top = 220
        Width = 417
        Height = 103
        TabOrder = 2
        object Label9: TLabel
          Left = 8
          Top = 22
          Width = 3
          Height = 13
        end
        object Label15: TLabel
          Left = 214
          Top = 22
          Width = 3
          Height = 13
        end
        object DefTabStopLabel: TLabel
          Left = 214
          Top = 49
          Width = 3
          Height = 13
        end
        object Label11: TLabel
          Left = 8
          Top = 75
          Width = 3
          Height = 13
        end
        object VisGutterBox: TCheckBox
          Left = 8
          Top = 49
          Width = 185
          Height = 17
          HelpContext = 938
          TabOrder = 1
          OnClick = SHIFTSelectBoxClick
        end
        object LeftBorderWidthBox: TEdit
          Tag = 1
          Left = 128
          Top = 19
          Width = 45
          Height = 21
          HelpContext = 1045
          MaxLength = 3
          TabOrder = 0
          Text = '1'
          OnChange = LeftBorderWidthBoxChange
          OnKeyDown = LeftBorderWidthBoxKeyDown
        end
        object IndentStepBox: TEdit
          Left = 382
          Top = 19
          Width = 25
          Height = 21
          HelpContext = 939
          TabOrder = 2
          OnExit = IndentStepBoxExit
          OnKeyDown = WrapColumnBoxKeyDown
        end
        object DeftabBox: TEdit
          Left = 382
          Top = 46
          Width = 25
          Height = 21
          HelpContext = 940
          TabOrder = 3
          OnExit = DeftabBoxExit
        end
        object TabColumnsBox: TEdit
          Left = 214
          Top = 73
          Width = 193
          Height = 21
          HelpContext = 1046
          TabOrder = 4
          OnExit = TabColumnsBoxExit
        end
      end
      object GroupBox3: TGroupBox
        Left = 8
        Top = 136
        Width = 417
        Height = 75
        TabOrder = 1
        object PageNosBox: TCheckBox
          Left = 214
          Top = 35
          Width = 200
          Height = 17
          HelpContext = 937
          TabOrder = 4
          OnClick = SHIFTSelectBoxClick
        end
        object DateBox: TCheckBox
          Left = 214
          Top = 19
          Width = 200
          Height = 17
          HelpContext = 936
          TabOrder = 3
          OnClick = SHIFTSelectBoxClick
        end
        object FileNamBox: TCheckBox
          Left = 8
          Top = 51
          Width = 200
          Height = 17
          HelpContext = 934
          TabOrder = 2
          OnClick = SHIFTSelectBoxClick
        end
        object LineNosBox: TCheckBox
          Left = 8
          Top = 35
          Width = 200
          Height = 17
          HelpContext = 933
          TabOrder = 1
          OnClick = SHIFTSelectBoxClick
        end
        object WrapLineBox: TCheckBox
          Left = 8
          Top = 19
          Width = 200
          Height = 17
          HelpContext = 935
          TabOrder = 0
          OnClick = SHIFTSelectBoxClick
        end
        object cbPrintColor: TCheckBox
          Left = 214
          Top = 51
          Width = 200
          Height = 17
          HelpContext = 701
          TabOrder = 5
          Visible = False
          OnClick = SHIFTSelectBoxClick
        end
      end
      object VisRMarginBox: TCheckBox
        Left = 216
        Top = 323
        Width = 121
        Height = 17
        Caption = 'Visible Right margin'
        TabOrder = 3
        Visible = False
        OnClick = SHIFTSelectBoxClick
      end
      object RightMarginWidthBox: TEdit
        Tag = 2
        Left = 390
        Top = 321
        Width = 30
        Height = 21
        MaxLength = 3
        TabOrder = 4
        Text = '1'
        Visible = False
        OnChange = LeftBorderWidthBoxChange
        OnKeyDown = LeftBorderWidthBoxKeyDown
      end
    end
    object HighlightingPage: TTabSheet
      Caption = 'Highlighting'
      object Label3: TLabel
        Left = 8
        Top = 7
        Width = 3
        Height = 13
      end
      object ElementLabel: TLabel
        Left = 8
        Top = 143
        Width = 3
        Height = 13
      end
      object FontNameLabel: TLabel
        Left = 8
        Top = 312
        Width = 3
        Height = 13
      end
      object FontSizeLabel: TLabel
        Left = 319
        Top = 311
        Width = 3
        Height = 13
      end
      object FGLabel: TLabel
        Left = 192
        Top = 156
        Width = 3
        Height = 13
      end
      object BGLabel: TLabel
        Left = 192
        Top = 207
        Width = 3
        Height = 13
      end
      object CharSetLabel: TLabel
        Left = 8
        Top = 282
        Width = 3
        Height = 13
      end
      object LangNameBox: TEdit
        Left = 152
        Top = 3
        Width = 273
        Height = 21
        HelpContext = 1047
        TabStop = False
        Enabled = False
        TabOrder = 0
      end
      object GroupBox1: TGroupBox
        Left = 288
        Top = 216
        Width = 138
        Height = 65
        TabOrder = 1
        object UseBoldBox: TCheckBox
          Tag = 1
          Left = 10
          Top = 13
          Width = 124
          Height = 17
          HelpContext = 942
          TabOrder = 0
          OnClick = UseBoldBoxClick
        end
        object UseItalicBox: TCheckBox
          Tag = 2
          Left = 10
          Top = 29
          Width = 124
          Height = 17
          HelpContext = 942
          TabOrder = 1
          OnClick = UseBoldBoxClick
        end
        object UseUnderlineBox: TCheckBox
          Tag = 3
          Left = 10
          Top = 45
          Width = 124
          Height = 17
          HelpContext = 942
          TabOrder = 2
          OnClick = UseBoldBoxClick
        end
      end
      object SynElementsBox: TListBox
        Left = 8
        Top = 158
        Width = 177
        Height = 109
        HelpContext = 941
        ItemHeight = 13
        TabOrder = 2
        OnClick = SynElementsBoxClick
      end
      object Panel1: TPanel
        Left = 8
        Top = 31
        Width = 417
        Height = 104
        BevelOuter = bvNone
        TabOrder = 3
        object FEditor: TSyntaxMemo
          Tag = 2
          Left = 0
          Top = 0
          Width = 417
          Height = 104
          HelpContext = 1048
          Align = alClient
          ClipCopyFormats = [smTEXT, smRTF]
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Courier New'
          Font.Style = []
          GutterFont.Charset = DEFAULT_CHARSET
          GutterFont.Color = clWindowText
          GutterFont.Height = -11
          GutterFont.Name = 'MS Sans Serif'
          GutterFont.Style = []
          HyperCursor = crDefault
          IndentStep = 1
          Margin = 2
          Modified = False
          MonoPrint = True
          Options = [smoSyntaxHighlight, smoPrintWrap, smoPrintLineNos, smoPrintFilename, smoPrintDate, smoPrintPageNos, smoAutoIndent, smoTabToColumn, smoWordSelect, smoShowRMargin, smoShowGutter, smoShowWrapColumn, smoTitleAsFilename, smoBlockOverwriteCursor, smoShowWrapGlyph, smoColumnTrack]
          ReadOnly = True
          RightMargin = 80
          SaveFormat = sfTEXT
          ScrollBars = ssBoth
          SelLineStyle = lsCRLF
          SelStart = 0
          SelLength = 0
          SelTextColor = clWhite
          SelTextBack = clTeal
          TabDefault = 4
          TabOrder = 0
          TabStop = False
          Version = '3.00.39u'
          VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES]
          WrapAtColumn = 0
          OnMouseDown = EditorMouseDown
          ActiveParser = 1
        end
      end
      object FontSizeBox: TComboBox
        Left = 371
        Top = 308
        Width = 55
        Height = 21
        HelpContext = 248
        ItemHeight = 13
        TabOrder = 4
        OnChange = FontSizeBoxChange
        Items.Strings = (
          '8'
          '9'
          '10'
          '11'
          '12'
          '14'
          '16'
          '18'
          '20'
          '22'
          '24'
          '26'
          '30')
      end
      object FontNameBox: TComboBox
        Left = 86
        Top = 308
        Width = 180
        Height = 21
        HelpContext = 226
        ItemHeight = 13
        TabOrder = 5
        OnChange = FontNameBoxChange
      end
      object DefCheckBox: TGroupBox
        Left = 288
        Top = 158
        Width = 138
        Height = 53
        TabOrder = 6
        object UseDefForeBox: TCheckBox
          Tag = 1
          Left = 8
          Top = 16
          Width = 124
          Height = 17
          TabOrder = 0
          OnClick = UseDefForeBoxClick
        end
        object UseDefBackBox: TCheckBox
          Left = 8
          Top = 33
          Width = 124
          Height = 17
          TabOrder = 1
          OnClick = UseDefForeBoxClick
        end
      end
      object FontFamilyBox: TComboBox
        Left = 86
        Top = 278
        Width = 180
        Height = 21
        HelpContext = 621
        ItemHeight = 13
        TabOrder = 7
        OnChange = FontFamilyBoxChange
      end
    end
    object AutoCorrectPage: TTabSheet
      Caption = 'Auto correct'
      object Panel4: TPanel
        Left = 0
        Top = 0
        Width = 434
        Height = 335
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvNone
        BorderWidth = 2
        TabOrder = 0
        object ReplaceLabel: TLabel
          Left = 10
          Top = 18
          Width = 48
          Height = 13
          Caption = 'Replace'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object WithLabel: TLabel
          Left = 154
          Top = 18
          Width = 27
          Height = 13
          Caption = 'With'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object ActKeysLabel: TLabel
          Left = 179
          Top = 304
          Width = 58
          Height = 13
          Caption = 'Act key(s)'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object AutoReplButton1: TButton
          Left = 10
          Top = 303
          Width = 75
          Height = 19
          HelpContext = 1129
          Caption = 'Add'
          TabOrder = 0
          OnClick = AutoReplButton1Click
        end
        object AutoReplButton2: TButton
          Left = 90
          Top = 303
          Width = 75
          Height = 19
          HelpContext = 1130
          Caption = 'Replace'
          TabOrder = 1
          OnClick = AutoReplButton2Click
        end
        object AutoReplBox: TListBox
          Left = 10
          Top = 32
          Width = 414
          Height = 237
          HelpContext = 1128
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          Sorted = True
          Style = lbOwnerDrawFixed
          TabOrder = 2
          OnClick = AutoReplBoxClick
          OnDrawItem = AutoReplBoxDrawItem
          OnMeasureItem = AutoReplBoxMeasureItem
        end
        object ReplaceBox: TEdit
          Left = 10
          Top = 270
          Width = 137
          Height = 22
          HelpContext = 1126
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 3
          OnChange = ReplaceBoxChange
        end
        object WithBox: TEdit
          Left = 147
          Top = 270
          Width = 277
          Height = 22
          HelpContext = 1127
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 4
          OnChange = WithBoxChange
        end
        object AutoReplActBox: TEdit
          Left = 256
          Top = 301
          Width = 168
          Height = 21
          HelpContext = 1131
          TabOrder = 5
          OnExit = AutoReplActBoxExit
        end
      end
    end
    object TemplatesPage: TTabSheet
      Caption = 'Code templates'
      object Panel5: TPanel
        Left = 0
        Top = 0
        Width = 434
        Height = 335
        Align = alClient
        BevelInner = bvLowered
        BevelOuter = bvNone
        BorderWidth = 2
        TabOrder = 0
        object NameLabel: TLabel
          Left = 10
          Top = 18
          Width = 33
          Height = 13
          Caption = 'Name'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object DescLabel: TLabel
          Left = 141
          Top = 18
          Width = 65
          Height = 13
          Caption = 'Description'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object HotKeyLabel: TLabel
          Left = 178
          Top = 304
          Width = 41
          Height = 13
          Caption = 'Hotkey'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object TemplateValueLabel: TLabel
          Left = 10
          Top = 137
          Width = 82
          Height = 13
          Caption = 'Code template'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object cteListBox: TListBox
          Left = 10
          Top = 32
          Width = 414
          Height = 73
          HelpContext = 1135
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ItemHeight = 16
          ParentFont = False
          Sorted = True
          Style = lbOwnerDrawFixed
          TabOrder = 0
          OnClick = cteListBoxClick
          OnDrawItem = AutoReplBoxDrawItem
          OnMeasureItem = AutoReplBoxMeasureItem
        end
        object cteNameBox: TEdit
          Left = 10
          Top = 106
          Width = 131
          Height = 22
          HelpContext = 1011
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 1
          OnChange = cteNameBoxChange
        end
        object cteDescBox: TEdit
          Left = 140
          Top = 106
          Width = 284
          Height = 22
          HelpContext = 1012
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Courier New'
          Font.Style = []
          ParentFont = False
          TabOrder = 2
          OnChange = cteDescBoxChange
        end
        object cteSynMemoPanel: TPanel
          Left = 10
          Top = 151
          Width = 414
          Height = 141
          BevelOuter = bvNone
          TabOrder = 3
          object SyntaxMemo1: TSyntaxMemo
            Left = 0
            Top = 0
            Width = 414
            Height = 141
            HelpContext = 1010
            Align = alClient
            ClipCopyFormats = [smTEXT, smRTF]
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'Courier New'
            Font.Style = []
            GutterFont.Charset = DEFAULT_CHARSET
            GutterFont.Color = clWindowText
            GutterFont.Height = -11
            GutterFont.Name = 'MS Sans Serif'
            GutterFont.Style = []
            HyperCursor = crDefault
            IndentStep = 1
            Margin = 2
            Modified = False
            MonoPrint = True
            Options = [smoSyntaxHighlight, smoPrintWrap, smoPrintLineNos, smoPrintFilename, smoPrintDate, smoPrintPageNos, smoAutoIndent, smoTabToColumn, smoWordSelect, smoShowRMargin, smoShowGutter, smoShowWrapColumn, smoTitleAsFilename, smoBlockOverwriteCursor, smoShowWrapGlyph, smoColumnTrack]
            ReadOnly = False
            RightMargin = 80
            SaveFormat = sfTEXT
            ScrollBars = ssBoth
            SelLineStyle = lsCRLF
            SelStart = 0
            SelLength = 0
            SelTextColor = clWhite
            SelTextBack = clTeal
            TabDefault = 4
            TabOrder = 0
            Version = '3.00.39u'
            VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES]
            WrapAtColumn = 0
            OnChange = SyntaxMemo1Change
            OnDataDrop = SyntaxMemo1DataDrop
            ActiveParser = 1
          end
        end
        object CodeTemplateButton1: TButton
          Left = 10
          Top = 303
          Width = 75
          Height = 19
          HelpContext = 1132
          Caption = 'Add'
          TabOrder = 4
          OnClick = CodeTemplateButton1Click
        end
        object CodeTemplateButton2: TButton
          Left = 90
          Top = 303
          Width = 75
          Height = 19
          HelpContext = 1133
          Caption = 'Replace'
          TabOrder = 5
          OnClick = CodeTemplateButton2Click
        end
        object cteHotkey: THotKey
          Left = 312
          Top = 301
          Width = 112
          Height = 19
          HelpContext = 1134
          HotKey = 32833
          InvalidKeys = [hcNone, hcShift]
          Modifiers = [hkAlt]
          TabOrder = 6
          OnExit = cteHotkeyExit
        end
      end
    end
  end
end