inherited frEditorForm: TfrEditorForm Left = 291 Height = 381 Top = 108 Width = 505 HelpContext = 11 ActiveControl = CB1 Caption = 'Text editor' ClientHeight = 381 ClientWidth = 505 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' KeyPreview = True OnCreate = FormCreate OnHide = FormHide OnKeyDown = FormKeyDown OnResize = FormResize OnShow = FormShow Position = poScreenCenter ShowHint = True object Panel2: TPanel[0] Left = 0 Height = 45 Top = 336 Width = 505 Align = alBottom BevelOuter = bvNone ClientHeight = 45 ClientWidth = 505 FullRepaint = False TabOrder = 0 object Button1: TButton Left = 355 Height = 27 Top = 10 Width = 72 HelpContext = 40 Anchors = [akRight, akBottom] BorderSpacing.InnerBorder = 4 Caption = 'Ok' Default = True ModalResult = 1 TabOrder = 0 end object Button2: TButton Left = 430 Height = 27 Top = 10 Width = 72 HelpContext = 50 Anchors = [akRight, akBottom] BorderSpacing.InnerBorder = 4 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 1 end object Button3: TButton Left = 8 Height = 27 Top = 10 Width = 75 HelpContext = 60 Anchors = [akLeft, akBottom] BorderSpacing.InnerBorder = 4 Caption = '&Variable' OnClick = Button3Click TabOrder = 2 end object Button4: TButton Left = 84 Height = 27 Top = 10 Width = 75 HelpContext = 70 Anchors = [akLeft, akBottom] BorderSpacing.InnerBorder = 4 Caption = '&DB field' OnClick = Button4Click TabOrder = 3 end object Button5: TButton Left = 248 Height = 27 Top = 10 Width = 75 HelpContext = 110 Anchors = [akLeft, akBottom] BorderSpacing.InnerBorder = 4 Caption = '&Format' OnClick = Button5Click TabOrder = 4 end object Button6: TButton Left = 160 Height = 27 Top = 10 Width = 75 HelpContext = 70 Anchors = [akLeft, akBottom] BorderSpacing.InnerBorder = 4 Caption = 'Function' OnClick = Button6Click TabOrder = 5 end end object ScriptPanel: TPanel[1] Left = 0 Height = 152 Top = 184 Width = 505 Align = alBottom BevelOuter = bvNone ClientHeight = 152 ClientWidth = 505 FullRepaint = False TabOrder = 1 object Label2: TLabel Left = 4 Height = 14 Top = 0 Width = 28 Caption = 'S&cript' ParentColor = False end object M2: TSynEdit Left = 0 Height = 136 Top = 16 Width = 505 Align = alBottom Anchors = [akTop, akLeft, akRight, akBottom] Font.Height = -14 Font.Name = 'courier' Font.Pitch = fpFixed Font.Quality = fqNonAntialiased ParentColor = False ParentFont = False TabOrder = 0 BookMarkOptions.Xoffset = 2 Gutter.Color = 13605511 Gutter.Width = 59 Gutter.MouseActions = < item Shift = [] ShiftMask = [] Button = mbLeft ClickCount = ccAny ClickDir = cdDown Command = 13 MoveCaret = False Option = 0 Priority = 0 end item Shift = [] ShiftMask = [] Button = mbRight ClickCount = ccSingle ClickDir = cdUp Command = 12 MoveCaret = False Option = 0 Priority = 0 end> Highlighter = SynPasSyn1 Keystrokes = < item Command = 3 ShortCut = 38 end item Command = 103 ShortCut = 8230 end item Command = 211 ShortCut = 16422 end item Command = 4 ShortCut = 40 end item Command = 104 ShortCut = 8232 end item Command = 212 ShortCut = 16424 end item Command = 1 ShortCut = 37 end item Command = 101 ShortCut = 8229 end item Command = 5 ShortCut = 16421 end item Command = 105 ShortCut = 24613 end item Command = 2 ShortCut = 39 end item Command = 102 ShortCut = 8231 end item Command = 6 ShortCut = 16423 end item Command = 106 ShortCut = 24615 end item Command = 10 ShortCut = 34 end item Command = 110 ShortCut = 8226 end item Command = 14 ShortCut = 16418 end item Command = 114 ShortCut = 24610 end item Command = 9 ShortCut = 33 end item Command = 109 ShortCut = 8225 end item Command = 13 ShortCut = 16417 end item Command = 113 ShortCut = 24609 end item Command = 7 ShortCut = 36 end item Command = 107 ShortCut = 8228 end item Command = 15 ShortCut = 16420 end item Command = 115 ShortCut = 24612 end item Command = 8 ShortCut = 35 end item Command = 108 ShortCut = 8227 end item Command = 16 ShortCut = 16419 end item Command = 116 ShortCut = 24611 end item Command = 223 ShortCut = 45 end item Command = 201 ShortCut = 16429 end item Command = 604 ShortCut = 8237 end item Command = 502 ShortCut = 46 end item Command = 603 ShortCut = 8238 end item Command = 501 ShortCut = 8 end item Command = 501 ShortCut = 8200 end item Command = 504 ShortCut = 16392 end item Command = 601 ShortCut = 32776 end item Command = 602 ShortCut = 40968 end item Command = 509 ShortCut = 13 end item Command = 199 ShortCut = 16449 end item Command = 201 ShortCut = 16451 end item Command = 610 ShortCut = 24649 end item Command = 509 ShortCut = 16461 end item Command = 510 ShortCut = 16462 end item Command = 503 ShortCut = 16468 end item Command = 611 ShortCut = 24661 end item Command = 604 ShortCut = 16470 end item Command = 603 ShortCut = 16472 end item Command = 507 ShortCut = 16473 end item Command = 506 ShortCut = 24665 end item Command = 601 ShortCut = 16474 end item Command = 602 ShortCut = 24666 end item Command = 301 ShortCut = 16432 end item Command = 302 ShortCut = 16433 end item Command = 303 ShortCut = 16434 end item Command = 304 ShortCut = 16435 end item Command = 305 ShortCut = 16436 end item Command = 306 ShortCut = 16437 end item Command = 307 ShortCut = 16438 end item Command = 308 ShortCut = 16439 end item Command = 309 ShortCut = 16440 end item Command = 310 ShortCut = 16441 end item Command = 351 ShortCut = 24624 end item Command = 352 ShortCut = 24625 end item Command = 353 ShortCut = 24626 end item Command = 354 ShortCut = 24627 end item Command = 355 ShortCut = 24628 end item Command = 356 ShortCut = 24629 end item Command = 357 ShortCut = 24630 end item Command = 358 ShortCut = 24631 end item Command = 359 ShortCut = 24632 end item Command = 360 ShortCut = 24633 end item Command = 231 ShortCut = 24654 end item Command = 232 ShortCut = 24643 end item Command = 233 ShortCut = 24652 end item Command = 612 ShortCut = 9 end item Command = 613 ShortCut = 8201 end item Command = 250 ShortCut = 24642 end> MouseActions = < item Shift = [] ShiftMask = [ssShift, ssAlt] Button = mbLeft ClickCount = ccSingle ClickDir = cdDown Command = 1 MoveCaret = True Option = 0 Priority = 0 end item Shift = [ssShift] ShiftMask = [ssShift, ssAlt] Button = mbLeft ClickCount = ccSingle ClickDir = cdDown Command = 1 MoveCaret = True Option = 1 Priority = 0 end item Shift = [ssAlt] ShiftMask = [ssShift, ssAlt] Button = mbLeft ClickCount = ccSingle ClickDir = cdDown Command = 3 MoveCaret = True Option = 0 Priority = 0 end item Shift = [ssShift, ssAlt] ShiftMask = [ssShift, ssAlt] Button = mbLeft ClickCount = ccSingle ClickDir = cdDown Command = 3 MoveCaret = True Option = 1 Priority = 0 end item Shift = [] ShiftMask = [] Button = mbRight ClickCount = ccSingle ClickDir = cdUp Command = 12 MoveCaret = False Option = 0 Priority = 0 end item Shift = [] ShiftMask = [] Button = mbLeft ClickCount = ccDouble ClickDir = cdDown Command = 6 MoveCaret = True Option = 0 Priority = 0 end item Shift = [] ShiftMask = [] Button = mbLeft ClickCount = ccTriple ClickDir = cdDown Command = 7 MoveCaret = True Option = 0 Priority = 0 end item Shift = [] ShiftMask = [] Button = mbLeft ClickCount = ccQuad ClickDir = cdDown Command = 8 MoveCaret = True Option = 0 Priority = 0 end item Shift = [] ShiftMask = [] Button = mbMiddle ClickCount = ccSingle ClickDir = cdDown Command = 10 MoveCaret = True Option = 0 Priority = 0 end item Shift = [ssCtrl] ShiftMask = [ssShift, ssAlt, ssCtrl] Button = mbLeft ClickCount = ccSingle ClickDir = cdUp Command = 11 MoveCaret = False Option = 0 Priority = 0 end> MouseSelActions = < item Shift = [] ShiftMask = [] Button = mbLeft ClickCount = ccSingle ClickDir = cdDown Command = 9 MoveCaret = False Option = 0 Priority = 0 end> Lines.Strings = ( 'Begin' ' a:=''ttttt";' ' b:=20;' ' if b>0 then' ' c:=25;' 'End' ) BracketHighlightStyle = sbhsBoth object TSynGutterPartList object TSynGutterMarks AutoSize = False Width = 22 end object TSynGutterLineNumber Width = 19 MouseActions = <> MarkupInfo.Background = clNone MarkupInfo.Foreground = clNone DigitCount = 2 ShowOnlyLineNumbersMultiplesOf = 1 ZeroStart = False LeadingZeros = False end object TSynGutterChanges Width = 4 ModifiedColor = 59900 SavedColor = clGreen end object TSynGutterSeparator Width = 2 end object TSynGutterCodeFolding MouseActions = < item Shift = [] ShiftMask = [] Button = mbRight ClickCount = ccSingle ClickDir = cdUp Command = 16 MoveCaret = False Option = 0 Priority = 0 end item Shift = [] ShiftMask = [ssShift] Button = mbMiddle ClickCount = ccAny ClickDir = cdDown Command = 14 MoveCaret = False Option = 0 Priority = 0 end item Shift = [ssShift] ShiftMask = [ssShift] Button = mbMiddle ClickCount = ccAny ClickDir = cdDown Command = 14 MoveCaret = False Option = 1 Priority = 0 end item Shift = [] ShiftMask = [] Button = mbLeft ClickCount = ccAny ClickDir = cdDown Command = 0 MoveCaret = False Option = 0 Priority = 0 end> MarkupInfo.Background = clWhite MarkupInfo.Foreground = clGray MouseActionsExpanded = < item Shift = [] ShiftMask = [] Button = mbLeft ClickCount = ccAny ClickDir = cdDown Command = 14 MoveCaret = False Option = 0 Priority = 0 end> MouseActionsCollapsed = < item Shift = [ssCtrl] ShiftMask = [ssCtrl] Button = mbLeft ClickCount = ccAny ClickDir = cdDown Command = 15 MoveCaret = False Option = 0 Priority = 0 end item Shift = [] ShiftMask = [ssCtrl] Button = mbLeft ClickCount = ccAny ClickDir = cdDown Command = 15 MoveCaret = False Option = 1 Priority = 0 end> end end end end object MemoPanel: TPanel[2] Left = 0 Height = 175 Top = 0 Width = 505 Align = alClient BevelOuter = bvNone ClientHeight = 175 ClientWidth = 505 FullRepaint = False TabOrder = 2 object M1: TMemo Left = 0 Height = 125 Top = 50 Width = 505 Align = alClient OnEnter = M1Enter OnKeyDown = M1KeyDown ScrollBars = ssAutoBoth TabOrder = 0 WordWrap = False end object Panel1: TPanel Left = 0 Height = 50 Top = 0 Width = 505 Align = alTop BevelOuter = bvNone Caption = 'Panel1' ClientHeight = 50 ClientWidth = 505 FullRepaint = False TabOrder = 1 object Label1: TLabel Left = 4 Height = 14 Top = 32 Width = 29 Caption = '&Memo' ParentColor = False end object Panel3: TPanel Left = 88 Height = 21 Top = 16 Width = 335 BevelOuter = bvLowered ClientHeight = 21 ClientWidth = 335 FullRepaint = False TabOrder = 0 object CB1: TCheckBox Left = 4 Height = 17 Top = 2 Width = 45 HelpContext = 80 AllowGrayed = True Caption = '&Script' OnClick = CB1Click TabOrder = 0 end object CB2: TCheckBox Left = 92 Height = 17 Top = 2 Width = 54 HelpContext = 90 AllowGrayed = True Caption = '&Big font' OnClick = CB2Click TabOrder = 1 end object CB3: TCheckBox Left = 224 Height = 17 Top = 2 Width = 70 HelpContext = 100 AllowGrayed = True Caption = '&Word wrap' OnClick = CB3Click TabOrder = 2 end end end end object Splitter: TSplitter[3] Cursor = crVSplit Left = 0 Height = 9 Top = 175 Width = 505 Align = alBottom Anchors = [akLeft, akBottom] Beveled = True ResizeAnchor = akBottom ResizeStyle = rsLine end object SynPasSyn1: TSynPasSyn[4] DefaultFilter = '(TSynHighlighterAttributes)' Enabled = False AsmAttri.Foreground = 5812813 CommentAttri.Foreground = 13461314 NumberAttri.Foreground = clRed StringAttri.Foreground = 15226932 CompilerMode = pcmDelphi NestedComments = False left = 228 top = 192 end end