object OptionsDialog: TOptionsDialog Left = 584 Top = 108 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Editor options' ClientHeight = 389 ClientWidth = 442 Color = clBtnFace Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True Position = poScreenCenter OnCreate = FormCreate OnKeyPress = FormKeyPress OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Panel2: TPanel Left = 0 Top = 348 Width = 442 Height = 41 Align = alBottom BevelOuter = bvNone TabOrder = 0 object OKButton: TButton Left = 245 Top = 8 Width = 75 Height = 25 Caption = 'OK' TabOrder = 0 OnClick = OKButtonClick end object CancelButton: TButton Left = 333 Top = 8 Width = 75 Height = 25 Caption = 'Cancel' ModalResult = 2 TabOrder = 1 end end object PageControl1: TPageControl Left = 0 Top = 0 Width = 442 Height = 348 ActivePage = AutoCorrectPage Align = alClient TabOrder = 1 object OptionsPage: TTabSheet Caption = 'Options' object Label15: TLabel Left = 7 Top = 253 Width = 104 Height = 13 Alignment = taRightJustify Caption = 'Block Indent step size' end object Label16: TLabel Left = 22 Top = 276 Width = 89 Height = 13 Alignment = taRightJustify Caption = 'Word wrap column' end object Label11: TLabel Left = 196 Top = 253 Width = 62 Height = 13 Alignment = taRightJustify Caption = 'Tab Columns' end object DefTabStopLabel: TLabel Left = 179 Top = 276 Width = 79 Height = 13 Alignment = taRightJustify Caption = 'Default Tab stop' end object GroupBox4: TGroupBox Left = 8 Top = 8 Width = 417 Height = 171 Caption = 'Options' TabOrder = 0 object Label13: TLabel Left = 12 Top = 21 Width = 72 Height = 13 Caption = 'Print options' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object Label14: TLabel Left = 134 Top = 21 Width = 90 Height = 13 Caption = 'General options' Font.Color = clWindowText Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object WrapLineBox: TCheckBox Left = 16 Top = 35 Width = 110 Height = 17 Caption = 'Wrap long lines' TabOrder = 0 OnClick = SHIFTSelectBoxClick end object LineNosBox: TCheckBox Left = 16 Top = 51 Width = 110 Height = 17 Caption = 'Line numbers' TabOrder = 1 OnClick = SHIFTSelectBoxClick end object FileNamBox: TCheckBox Left = 16 Top = 67 Width = 110 Height = 17 Caption = 'Title in header' TabOrder = 2 OnClick = SHIFTSelectBoxClick end object DateBox: TCheckBox Left = 16 Top = 83 Width = 110 Height = 17 Caption = 'Date in header' TabOrder = 3 OnClick = SHIFTSelectBoxClick end object PageNosBox: TCheckBox Left = 16 Top = 99 Width = 110 Height = 17 Caption = 'Page numbers' TabOrder = 4 OnClick = SHIFTSelectBoxClick end object DispWrapBox: TCheckBox Left = 138 Top = 35 Width = 130 Height = 17 Caption = 'Word wrap' TabOrder = 5 OnClick = SHIFTSelectBoxClick end object Panel6: TPanel Left = 128 Top = 12 Width = 2 Height = 151 BevelOuter = bvLowered Caption = 'Panel6' TabOrder = 6 end object AutoIndentBox: TCheckBox Left = 138 Top = 67 Width = 130 Height = 17 Caption = 'Auto-indent' TabOrder = 7 OnClick = SHIFTSelectBoxClick end object TabColBox: TCheckBox Left = 138 Top = 83 Width = 130 Height = 17 Caption = 'Smart tabs' TabOrder = 8 OnClick = SHIFTSelectBoxClick end object WrapOverrideBox: TCheckBox Left = 138 Top = 51 Width = 130 Height = 17 Caption = 'Override wrapping' TabOrder = 9 OnClick = SHIFTSelectBoxClick end object WordSelectBox: TCheckBox Left = 270 Top = 83 Width = 145 Height = 17 Caption = 'Word select' TabOrder = 10 OnClick = SHIFTSelectBoxClick end object PrnSynHighlightBox: TCheckBox Left = 270 Top = 99 Width = 145 Height = 17 Caption = 'Syntax highlighting' TabOrder = 11 OnClick = SHIFTSelectBoxClick end object TitleAsFilenameBox: TCheckBox Left = 270 Top = 51 Width = 145 Height = 17 Caption = 'Title as filename' TabOrder = 12 OnClick = SHIFTSelectBoxClick end object BlockCursorBox: TCheckBox Left = 270 Top = 67 Width = 145 Height = 17 Caption = 'Block cursor for Overwrite' TabOrder = 13 OnClick = SHIFTSelectBoxClick end object MarkWrapBox: TCheckBox Left = 270 Top = 35 Width = 145 Height = 17 Caption = 'Mark wrapped lines' TabOrder = 14 OnClick = SHIFTSelectBoxClick end object SmartFillBox: TCheckBox Left = 138 Top = 99 Width = 130 Height = 17 Caption = 'Smart fill' TabOrder = 15 OnClick = SHIFTSelectBoxClick end object UseTabBox: TCheckBox Left = 138 Top = 115 Width = 130 Height = 17 Caption = 'Use TAB character' TabOrder = 16 OnClick = SHIFTSelectBoxClick end object CursorAfterEOLBox: TCheckBox Left = 270 Top = 115 Width = 145 Height = 17 Caption = 'Cursor beyond EOL' TabOrder = 17 OnClick = SHIFTSelectBoxClick end object EdLineNosBox: TCheckBox Left = 138 Top = 131 Width = 130 Height = 17 Caption = 'Line numbers in gutter' TabOrder = 18 OnClick = SHIFTSelectBoxClick end object ShowAllCharsBox: TCheckBox Left = 270 Top = 131 Width = 145 Height = 17 Caption = 'Show all characters' TabOrder = 19 OnClick = SHIFTSelectBoxClick end end object WrapColumnBox: TEdit Left = 118 Top = 272 Width = 25 Height = 21 TabOrder = 1 Text = 'WrapColumnBox' OnExit = WrapColumnBoxExit OnKeyDown = WrapColumnBoxKeyDown end object IndentStepBox: TEdit Left = 118 Top = 249 Width = 25 Height = 21 TabOrder = 2 Text = 'IndentStepBox' OnExit = IndentStepBoxExit OnKeyDown = WrapColumnBoxKeyDown end object GroupBox2: TGroupBox Left = 8 Top = 182 Width = 417 Height = 59 TabOrder = 3 object Label7: TLabel Left = 16 Top = 36 Width = 59 Height = 13 Caption = 'Right margin' end object Label9: TLabel Left = 184 Top = 36 Width = 57 Height = 13 Caption = 'Gutter width' end object VisRMarginBox: TCheckBox Left = 16 Top = 12 Width = 121 Height = 17 Caption = 'Visible Right margin' TabOrder = 0 OnClick = SHIFTSelectBoxClick end object RightMarginWidthBox: TEdit Tag = 2 Left = 83 Top = 32 Width = 45 Height = 21 MaxLength = 3 TabOrder = 1 Text = '1' OnChange = LeftBorderWidthBoxChange OnKeyDown = LeftBorderWidthBoxKeyDown end object VisGutterBox: TCheckBox Left = 184 Top = 12 Width = 97 Height = 17 Caption = 'Visible Gutter' TabOrder = 2 OnClick = SHIFTSelectBoxClick end object LeftBorderWidthBox: TEdit Tag = 1 Left = 247 Top = 32 Width = 45 Height = 21 MaxLength = 3 TabOrder = 3 Text = '1' OnChange = LeftBorderWidthBoxChange OnKeyDown = LeftBorderWidthBoxKeyDown end end object ShowWrapColumnBox: TCheckBox Left = 6 Top = 296 Width = 137 Height = 17 Alignment = taLeftJustify Caption = 'Show word-wrap column' TabOrder = 4 OnClick = SHIFTSelectBoxClick end object TabColumnsBox: TEdit Left = 264 Top = 249 Width = 160 Height = 21 TabOrder = 5 Text = 'TabColumnsBox' OnExit = TabColumnsBoxExit end object DeftabBox: TEdit Left = 264 Top = 272 Width = 25 Height = 21 TabOrder = 6 Text = 'DeftabBox' OnExit = DeftabBoxExit end end object HighlightingPage: TTabSheet Caption = 'Highlighting' object Label3: TLabel Left = 10 Top = 7 Width = 105 Height = 13 Caption = 'Current language style' end object ElementLabel: TLabel Left = 10 Top = 24 Width = 38 Height = 13 Caption = 'Element' end object FontNameLabel: TLabel Left = 9 Top = 150 Width = 21 Height = 13 Alignment = taRightJustify Caption = 'Font' end object FontSizeLabel: TLabel Left = 214 Top = 150 Width = 20 Height = 13 Alignment = taRightJustify Caption = 'Size' end object FGLabel: TLabel Left = 136 Top = 37 Width = 54 Height = 13 Caption = 'Foreground' end object BGLabel: TLabel Left = 136 Top = 88 Width = 58 Height = 13 Caption = 'Background' end object Label1: TLabel Left = 8 Top = 176 Width = 36 Height = 13 Alignment = taRightJustify Caption = 'Charset' end object LangNameBox: TEdit Left = 120 Top = 3 Width = 297 Height = 21 TabStop = False Enabled = False TabOrder = 0 Text = 'LangNameBox' end object GroupBox1: TGroupBox Left = 304 Top = 33 Width = 113 Height = 65 Caption = 'Text attributes' TabOrder = 1 object UseBoldBox: TCheckBox Tag = 1 Left = 10 Top = 13 Width = 97 Height = 17 Caption = '&Bold' TabOrder = 0 OnClick = UseBoldBoxClick end object UseItalicBox: TCheckBox Tag = 2 Left = 10 Top = 29 Width = 97 Height = 17 Caption = '&Italic' TabOrder = 1 OnClick = UseBoldBoxClick end object UseUnderlineBox: TCheckBox Tag = 3 Left = 10 Top = 45 Width = 97 Height = 17 Caption = '&Underline' TabOrder = 2 OnClick = UseBoldBoxClick end end object SynElementsBox: TListBox Left = 8 Top = 38 Width = 121 Height = 99 ItemHeight = 13 TabOrder = 2 OnClick = SynElementsBoxClick end object Panel1: TPanel Left = 8 Top = 204 Width = 417 Height = 113 BevelOuter = bvNone TabOrder = 3 object FEditor: TSyntaxMemo Tag = 2 Left = 0 Top = 0 Width = 417 Height = 113 Align = alClient ClipCopyFormats = [smTEXT, smRTF] Font.Color = clWindowText Font.Height = -13 Font.Name = 'Courier New' Font.Style = [] GutterFont.Color = clWindowText GutterFont.Height = -11 GutterFont.Name = 'MS Sans Serif' GutterFont.Style = [] HyperCursor = crDefault IndentStep = 1 Lines.Strings = ( 'FEditor') 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 = lsLF SelStart = 0 SelLength = 0 SelTextColor = clWhite SelTextBack = clTeal TabDefault = 4 TabOrder = 0 TabStop = False Version = '3.00.36_alr' VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES] WrapAtColumn = 0 OnMouseDown = EditorMouseDown ActiveParser = 1 end end object FontSizeBox: TComboBox Left = 242 Top = 146 Width = 55 Height = 21 ItemHeight = 13 Items.Strings = ( '8' '9' '10' '11' '12' '14' '16' '18' '20' '22' '24' '26' '30') TabOrder = 4 Text = 'FontSizeBox' OnChange = FontSizeBoxChange end object FontNameBox: TComboBox Left = 53 Top = 146 Width = 150 Height = 21 ItemHeight = 0 TabOrder = 5 Text = 'FontNameBox' OnChange = FontNameBoxChange end object DefCheckBox: TGroupBox Left = 304 Top = 110 Width = 114 Height = 56 Caption = 'Use defaults for' TabOrder = 6 object UseDefForeBox: TCheckBox Tag = 1 Left = 8 Top = 16 Width = 97 Height = 17 Caption = 'Foreground' TabOrder = 0 OnClick = UseDefForeBoxClick end object UseDefBackBox: TCheckBox Left = 8 Top = 33 Width = 97 Height = 17 Caption = 'Background' TabOrder = 1 OnClick = UseDefForeBoxClick end end object FontFamilyBox: TComboBox Left = 53 Top = 171 Width = 150 Height = 21 ItemHeight = 0 TabOrder = 7 Text = 'FontFamilyBox' OnChange = FontFamilyBoxChange end end object KeyMappingsPage: TTabSheet Caption = 'Key Assignments' object Panel3: TPanel Left = 0 Top = 0 Width = 434 Height = 320 Align = alClient BevelOuter = bvNone BorderWidth = 2 TabOrder = 0 object CommandsLabel: TLabel Left = 16 Top = 16 Width = 52 Height = 13 Caption = 'Commands' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object UsesKeysLabel: TLabel Left = 245 Top = 16 Width = 50 Height = 13 Caption = 'Uses Keys' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object CommandDescListBox: TListBox Left = 16 Top = 32 Width = 209 Height = 273 ExtendedSelect = False ItemHeight = 13 TabOrder = 0 OnClick = CommandDescListBoxClick end object CommandKeysListBox: TListBox Left = 241 Top = 32 Width = 185 Height = 130 ExtendedSelect = False ItemHeight = 13 TabOrder = 1 OnClick = CommandKeysListBoxClick OnExit = CommandKeysListBoxExit end object AddButton: TButton Left = 279 Top = 170 Width = 45 Height = 21 Caption = 'Add' TabOrder = 2 OnClick = AddButtonClick end object DeleteButton: TButton Left = 379 Top = 170 Width = 45 Height = 21 Caption = 'Delete' TabOrder = 3 OnClick = DeleteButtonClick end object EditButton: TButton Left = 329 Top = 170 Width = 45 Height = 21 Caption = 'Edit' TabOrder = 4 OnClick = EditButtonClick end end end object AutoCorrectPage: TTabSheet Caption = 'Auto Correct' object Panel4: TPanel Left = 0 Top = 0 Width = 434 Height = 320 Align = alClient BevelOuter = bvNone BorderWidth = 2 TabOrder = 0 object ReplaceLabel: TLabel Left = 16 Top = 16 Width = 40 Height = 13 Caption = 'Replace' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object WithLabel: TLabel Left = 160 Top = 16 Width = 22 Height = 13 Caption = 'With' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object ActKeysLabel: TLabel Left = 195 Top = 281 Width = 47 Height = 13 Caption = 'Act key(s)' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object AutoReplButton1: TButton Left = 16 Top = 278 Width = 65 Height = 19 Caption = 'Add' TabOrder = 0 OnClick = AutoReplButton1Click end object AutoReplButton2: TButton Left = 104 Top = 278 Width = 65 Height = 19 Caption = 'Replace' TabOrder = 1 OnClick = AutoReplButton2Click end object AutoReplBox: TListBox Left = 16 Top = 32 Width = 401 Height = 213 Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ItemHeight = 16 Items.Strings = ( 'one' 'three' 'two') ParentFont = False Sorted = True Style = lbOwnerDrawFixed TabOrder = 2 OnClick = AutoReplBoxClick OnDrawItem = AutoReplBoxDrawItem OnMeasureItem = AutoReplBoxMeasureItem end object ReplaceBox: TEdit Left = 16 Top = 246 Width = 137 Height = 22 Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False TabOrder = 3 OnChange = ReplaceBoxChange end object WithBox: TEdit Left = 153 Top = 246 Width = 264 Height = 22 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 = 277 Width = 161 Height = 21 TabOrder = 5 Text = 'AutoReplActBox' OnExit = AutoReplActBoxExit end end end object TemplatesPage: TTabSheet Caption = 'Code Templates' object Panel5: TPanel Left = 0 Top = 0 Width = 434 Height = 320 Align = alClient BevelOuter = bvNone BorderWidth = 2 TabOrder = 0 object NameLabel: TLabel Left = 16 Top = 16 Width = 28 Height = 13 Caption = 'Name' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object DescLabel: TLabel Left = 160 Top = 16 Width = 53 Height = 13 Caption = 'Description' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object HotKeyLabel: TLabel Left = 240 Top = 292 Width = 34 Height = 13 Caption = 'Hotkey' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object TemplateValueLabel: TLabel Left = 16 Top = 136 Width = 68 Height = 13 Caption = 'Code template' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object cteListBox: TListBox Left = 16 Top = 32 Width = 401 Height = 73 Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ItemHeight = 16 Items.Strings = ( 'one' 'three' 'two') ParentFont = False Sorted = True Style = lbOwnerDrawFixed TabOrder = 0 OnClick = cteListBoxClick OnDrawItem = AutoReplBoxDrawItem OnMeasureItem = AutoReplBoxMeasureItem end object cteNameBox: TEdit Left = 16 Top = 106 Width = 131 Height = 22 Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False TabOrder = 1 Text = 'cteNameBox' OnChange = cteNameBoxChange end object cteDescBox: TEdit Left = 146 Top = 106 Width = 271 Height = 22 Font.Color = clWindowText Font.Height = -11 Font.Name = 'Courier New' Font.Style = [] ParentFont = False TabOrder = 2 Text = 'cteDescBox' OnChange = cteDescBoxChange end object cteSynMemoPanel: TPanel Left = 16 Top = 151 Width = 401 Height = 129 BevelOuter = bvNone TabOrder = 3 object SyntaxMemo1: TSyntaxMemo Left = 0 Top = 0 Width = 401 Height = 129 Align = alClient ClipCopyFormats = [smTEXT, smRTF] Font.Color = clWindowText Font.Height = -13 Font.Name = 'Courier New' Font.Style = [] 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 = lsLF SelStart = 0 SelLength = 0 SelTextColor = clWhite SelTextBack = clTeal TabDefault = 4 TabOrder = 0 Version = '3.00.36_alr' VisiblePropEdPages = [ppOPTIONS, ppHIGHLIGHTING, ppKEYS, ppAUTOCORRECT, ppTEMPLATES] WrapAtColumn = 0 OnChange = SyntaxMemo1Change OnDataDrop = SyntaxMemo1DataDrop ActiveParser = 1 end end object CodeTemplateButton1: TButton Left = 16 Top = 291 Width = 65 Height = 19 Caption = 'Add' TabOrder = 4 OnClick = CodeTemplateButton1Click end object CodeTemplateButton2: TButton Left = 104 Top = 291 Width = 65 Height = 19 Caption = 'Replace' TabOrder = 5 OnClick = CodeTemplateButton2Click end object cteHotkey: THotKey Left = 296 Top = 288 Width = 121 Height = 19 HotKey = 32833 InvalidKeys = [hcNone, hcShift] Modifiers = [hkAlt] TabOrder = 6 OnExit = cteHotkeyExit end end end end end