| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884 |
- object Form1: TForm1
- Left = 340
- Height = 628
- Top = 150
- Width = 1172
- Caption = 'BGRAScript'
- ClientHeight = 628
- ClientWidth = 1172
- Color = 15790320
- OnCreate = FormCreate
- Position = poDesktopCenter
- ShowHint = True
- LCLVersion = '1.2.4.0'
- inline SynEdit1: TSynEdit
- Left = 0
- Height = 343
- Hint = 'Ctrl + Spacebar to show templates.'
- Top = 285
- Width = 1172
- Align = alBottom
- Anchors = [akTop, akLeft, akRight, akBottom]
- Font.Height = -16
- Font.Name = 'Courier New'
- Font.Pitch = fpFixed
- Font.Quality = fqCleartypeNatural
- ParentColor = False
- ParentFont = False
- TabOrder = 0
- Gutter.Width = 61
- Gutter.MouseActions = <>
- RightGutter.Width = 0
- RightGutter.MouseActions = <>
- Highlighter = SynAnySyn1
- Keystrokes = <
- item
- Command = ecUp
- ShortCut = 38
- end
- item
- Command = ecSelUp
- ShortCut = 8230
- end
- item
- Command = ecScrollUp
- ShortCut = 16422
- end
- item
- Command = ecDown
- ShortCut = 40
- end
- item
- Command = ecSelDown
- ShortCut = 8232
- end
- item
- Command = ecScrollDown
- ShortCut = 16424
- end
- item
- Command = ecLeft
- ShortCut = 37
- end
- item
- Command = ecSelLeft
- ShortCut = 8229
- end
- item
- Command = ecWordLeft
- ShortCut = 16421
- end
- item
- Command = ecSelWordLeft
- ShortCut = 24613
- end
- item
- Command = ecRight
- ShortCut = 39
- end
- item
- Command = ecSelRight
- ShortCut = 8231
- end
- item
- Command = ecWordRight
- ShortCut = 16423
- end
- item
- Command = ecSelWordRight
- ShortCut = 24615
- end
- item
- Command = ecPageDown
- ShortCut = 34
- end
- item
- Command = ecSelPageDown
- ShortCut = 8226
- end
- item
- Command = ecPageBottom
- ShortCut = 16418
- end
- item
- Command = ecSelPageBottom
- ShortCut = 24610
- end
- item
- Command = ecPageUp
- ShortCut = 33
- end
- item
- Command = ecSelPageUp
- ShortCut = 8225
- end
- item
- Command = ecPageTop
- ShortCut = 16417
- end
- item
- Command = ecSelPageTop
- ShortCut = 24609
- end
- item
- Command = ecLineStart
- ShortCut = 36
- end
- item
- Command = ecSelLineStart
- ShortCut = 8228
- end
- item
- Command = ecEditorTop
- ShortCut = 16420
- end
- item
- Command = ecSelEditorTop
- ShortCut = 24612
- end
- item
- Command = ecLineEnd
- ShortCut = 35
- end
- item
- Command = ecSelLineEnd
- ShortCut = 8227
- end
- item
- Command = ecEditorBottom
- ShortCut = 16419
- end
- item
- Command = ecSelEditorBottom
- ShortCut = 24611
- end
- item
- Command = ecToggleMode
- ShortCut = 45
- end
- item
- Command = ecCopy
- ShortCut = 16429
- end
- item
- Command = ecPaste
- ShortCut = 8237
- end
- item
- Command = ecDeleteChar
- ShortCut = 46
- end
- item
- Command = ecCut
- ShortCut = 8238
- end
- item
- Command = ecDeleteLastChar
- ShortCut = 8
- end
- item
- Command = ecDeleteLastChar
- ShortCut = 8200
- end
- item
- Command = ecDeleteLastWord
- ShortCut = 16392
- end
- item
- Command = ecUndo
- ShortCut = 32776
- end
- item
- Command = ecRedo
- ShortCut = 40968
- end
- item
- Command = ecLineBreak
- ShortCut = 13
- end
- item
- Command = ecSelectAll
- ShortCut = 16449
- end
- item
- Command = ecCopy
- ShortCut = 16451
- end
- item
- Command = ecBlockIndent
- ShortCut = 24649
- end
- item
- Command = ecLineBreak
- ShortCut = 16461
- end
- item
- Command = ecInsertLine
- ShortCut = 16462
- end
- item
- Command = ecDeleteWord
- ShortCut = 16468
- end
- item
- Command = ecBlockUnindent
- ShortCut = 24661
- end
- item
- Command = ecPaste
- ShortCut = 16470
- end
- item
- Command = ecCut
- ShortCut = 16472
- end
- item
- Command = ecDeleteLine
- ShortCut = 16473
- end
- item
- Command = ecDeleteEOL
- ShortCut = 24665
- end
- item
- Command = ecUndo
- ShortCut = 16474
- end
- item
- Command = ecRedo
- ShortCut = 24666
- end
- item
- Command = ecGotoMarker0
- ShortCut = 16432
- end
- item
- Command = ecGotoMarker1
- ShortCut = 16433
- end
- item
- Command = ecGotoMarker2
- ShortCut = 16434
- end
- item
- Command = ecGotoMarker3
- ShortCut = 16435
- end
- item
- Command = ecGotoMarker4
- ShortCut = 16436
- end
- item
- Command = ecGotoMarker5
- ShortCut = 16437
- end
- item
- Command = ecGotoMarker6
- ShortCut = 16438
- end
- item
- Command = ecGotoMarker7
- ShortCut = 16439
- end
- item
- Command = ecGotoMarker8
- ShortCut = 16440
- end
- item
- Command = ecGotoMarker9
- ShortCut = 16441
- end
- item
- Command = ecSetMarker0
- ShortCut = 24624
- end
- item
- Command = ecSetMarker1
- ShortCut = 24625
- end
- item
- Command = ecSetMarker2
- ShortCut = 24626
- end
- item
- Command = ecSetMarker3
- ShortCut = 24627
- end
- item
- Command = ecSetMarker4
- ShortCut = 24628
- end
- item
- Command = ecSetMarker5
- ShortCut = 24629
- end
- item
- Command = ecSetMarker6
- ShortCut = 24630
- end
- item
- Command = ecSetMarker7
- ShortCut = 24631
- end
- item
- Command = ecSetMarker8
- ShortCut = 24632
- end
- item
- Command = ecSetMarker9
- ShortCut = 24633
- end
- item
- Command = EcFoldLevel1
- ShortCut = 41009
- end
- item
- Command = EcFoldLevel2
- ShortCut = 41010
- end
- item
- Command = EcFoldLevel1
- ShortCut = 41011
- end
- item
- Command = EcFoldLevel1
- ShortCut = 41012
- end
- item
- Command = EcFoldLevel1
- ShortCut = 41013
- end
- item
- Command = EcFoldLevel6
- ShortCut = 41014
- end
- item
- Command = EcFoldLevel7
- ShortCut = 41015
- end
- item
- Command = EcFoldLevel8
- ShortCut = 41016
- end
- item
- Command = EcFoldLevel9
- ShortCut = 41017
- end
- item
- Command = EcFoldLevel0
- ShortCut = 41008
- end
- item
- Command = EcFoldCurrent
- ShortCut = 41005
- end
- item
- Command = EcUnFoldCurrent
- ShortCut = 41003
- end
- item
- Command = EcToggleMarkupWord
- ShortCut = 32845
- end
- item
- Command = ecNormalSelect
- ShortCut = 24654
- end
- item
- Command = ecColumnSelect
- ShortCut = 24643
- end
- item
- Command = ecLineSelect
- ShortCut = 24652
- end
- item
- Command = ecTab
- ShortCut = 9
- end
- item
- Command = ecShiftTab
- ShortCut = 8201
- end
- item
- Command = ecMatchBracket
- ShortCut = 24642
- end
- item
- Command = ecColSelUp
- ShortCut = 40998
- end
- item
- Command = ecColSelDown
- ShortCut = 41000
- end
- item
- Command = ecColSelLeft
- ShortCut = 40997
- end
- item
- Command = ecColSelRight
- ShortCut = 40999
- end
- item
- Command = ecColSelPageDown
- ShortCut = 40994
- end
- item
- Command = ecColSelPageBottom
- ShortCut = 57378
- end
- item
- Command = ecColSelPageUp
- ShortCut = 40993
- end
- item
- Command = ecColSelPageTop
- ShortCut = 57377
- end
- item
- Command = ecColSelLineStart
- ShortCut = 40996
- end
- item
- Command = ecColSelLineEnd
- ShortCut = 40995
- end
- item
- Command = ecColSelEditorTop
- ShortCut = 57380
- end
- item
- Command = ecColSelEditorBottom
- ShortCut = 57379
- end>
- MouseActions = <>
- MouseTextActions = <>
- MouseSelActions = <>
- Lines.Strings = (
- '{ BGRAScript }'
- 'FillTransparent'
- ''
- '// "store some values"'
- 'let oneh 100'
- 'let drawmode "dmDrawWithTransparency"'
- 'let blendmode "boTransparent"'
- 'let filename "file.png"'
- 'let color1 "rgba(250,250,250,1)"'
- 'let color2 "rgba(255,255,255,1)"'
- 'GetWidth width'
- 'GetHeight height'
- ''
- '// "Draw rectangles, lines and bitmap"'
- 'Rectangle 0,0,oneh,oneh,"rgba(0,0,0,0.6)",color1,drawmode'
- 'Rectangle 20,20,80,80,"rgba(0,0,0,0.4)",color2,drawmode'
- 'SetHorizLine 0,10,98,"rgba(0,0,0,.3)"'
- 'SetVertLine 90,1,98,"rgba(0,0,0,.3)"'
- 'BlendBitmap 26,26,"test.png",blendmode'
- ''
- '// "Save and weird things step 1"'
- 'SaveToFile filename'
- 'Negative'
- 'BlendBitmap 0,oneh,filename,blendmode'
- ''
- '// "Save and weird things step 2"'
- 'SaveToFile filename'
- 'Negative'
- 'FilterFastBlur 3,"False"'
- 'BlendBitmap oneh,0,filename,blendmode'
- ''
- '// "Flip the world and save it"'
- 'VerticalFlip 0,0,100,100'
- 'HorizontalFlip 100,100,200,200'
- 'VerticalFlip 100,0,200,100'
- 'HorizontalFlip 100,0,200,100'
- 'SaveToFile filename'
- '// "goto line (skip all the intermediate lines)"'
- 'goto 47'
- ''
- '// "Weird things level 3"'
- 'DrawCheckers 200,0,300,300,"rgba(100,100,100,255)","rgba(0,0,0,0)"'
- 'InplaceGrayscaleRect 0,0,100,100'
- 'FilterSmooth "False"'
- 'ApplyBitmapMask filename,100,100,200,200,0,100'
- ''
- 'DrawHorizLine 0,0,width,"rgba(0,0,0,1)"'
- 'DrawVertLine 0,0,height,"rgba(0,0,0,1)"'
- ''
- '// "Save this in your hard disk (again)"'
- 'SaveToFile filename'
- 'print "End: ''",filename,"'' saved!"'
- )
- VisibleSpecialChars = [vscSpace, vscTabAtLast]
- SelectedColor.FrameEdges = sfeAround
- SelectedColor.BackPriority = 50
- SelectedColor.ForePriority = 50
- SelectedColor.FramePriority = 50
- SelectedColor.BoldPriority = 50
- SelectedColor.ItalicPriority = 50
- SelectedColor.UnderlinePriority = 50
- SelectedColor.StrikeOutPriority = 50
- IncrementColor.FrameEdges = sfeAround
- HighlightAllColor.FrameEdges = sfeAround
- BracketHighlightStyle = sbhsBoth
- BracketMatchColor.Background = clNone
- BracketMatchColor.Foreground = clNone
- BracketMatchColor.FrameEdges = sfeAround
- BracketMatchColor.Style = [fsBold]
- FoldedCodeColor.Background = clNone
- FoldedCodeColor.Foreground = clGray
- FoldedCodeColor.FrameColor = clGray
- FoldedCodeColor.FrameEdges = sfeAround
- MouseLinkColor.Background = clNone
- MouseLinkColor.Foreground = clBlue
- MouseLinkColor.FrameEdges = sfeAround
- LineHighlightColor.Background = clNone
- LineHighlightColor.Foreground = clNone
- LineHighlightColor.FrameEdges = sfeAround
- inline SynLeftGutterPartList1: TSynGutterPartList
- object SynGutterMarks1: TSynGutterMarks
- Width = 24
- MouseActions = <>
- end
- object SynGutterLineNumber1: TSynGutterLineNumber
- Width = 21
- MouseActions = <>
- MarkupInfo.Background = clBtnFace
- MarkupInfo.Foreground = clNone
- MarkupInfo.FrameEdges = sfeAround
- DigitCount = 2
- ShowOnlyLineNumbersMultiplesOf = 1
- ZeroStart = False
- LeadingZeros = False
- end
- object SynGutterChanges1: TSynGutterChanges
- Width = 4
- MouseActions = <>
- ModifiedColor = 59900
- SavedColor = clGreen
- end
- object SynGutterSeparator1: TSynGutterSeparator
- Width = 2
- MouseActions = <>
- MarkupInfo.Background = clWhite
- MarkupInfo.Foreground = clGray
- MarkupInfo.FrameEdges = sfeAround
- end
- object SynGutterCodeFolding1: TSynGutterCodeFolding
- MouseActions = <>
- MarkupInfo.Background = clNone
- MarkupInfo.Foreground = clGray
- MarkupInfo.FrameEdges = sfeAround
- MouseActionsExpanded = <>
- MouseActionsCollapsed = <>
- end
- end
- end
- object Splitter1: TSplitter
- Cursor = crVSplit
- Left = 0
- Height = 5
- Top = 280
- Width = 1172
- Align = alBottom
- ResizeAnchor = akBottom
- end
- object BGRAGraphicControl1: TBGRAGraphicControl
- Left = 8
- Height = 220
- Hint = 'Click to update.'
- Top = 56
- Width = 496
- OnRedraw = BGRAGraphicControl1Redraw
- Color = clWhite
- ColorOpacity = 128
- Alignment = taCenter
- OnClick = BGRAGraphicControl1Click
- Caption = 'BGRAGraphicControl1'
- end
- object BGRAVirtualScreen1: TBGRAVirtualScreen
- Left = 0
- Height = 50
- Top = 0
- Width = 1172
- OnRedraw = BGRAVirtualScreen1Redraw
- Align = alTop
- Alignment = taLeftJustify
- ChildSizing.LeftRightSpacing = 8
- ChildSizing.TopBottomSpacing = 8
- ChildSizing.HorizontalSpacing = 8
- ChildSizing.VerticalSpacing = 8
- ChildSizing.Layout = cclTopToBottomThenLeftToRight
- ClientHeight = 50
- ClientWidth = 1172
- Color = clWhite
- ParentColor = False
- TabOrder = 2
- object BCButton1: TBCButton
- Left = 1026
- Height = 32
- Top = 9
- Width = 137
- Align = alRight
- AutoSize = True
- StateClicked.Background.Color = clBlack
- StateClicked.Background.ColorOpacity = 255
- StateClicked.Background.Gradient1.StartColor = 7726591
- StateClicked.Background.Gradient1.StartColorOpacity = 255
- StateClicked.Background.Gradient1.DrawMode = dmSet
- StateClicked.Background.Gradient1.EndColor = 7067903
- StateClicked.Background.Gradient1.EndColorOpacity = 255
- StateClicked.Background.Gradient1.ColorCorrection = True
- StateClicked.Background.Gradient1.GradientType = gtLinear
- StateClicked.Background.Gradient1.Point1XPercent = 0
- StateClicked.Background.Gradient1.Point1YPercent = 0
- StateClicked.Background.Gradient1.Point2XPercent = 0
- StateClicked.Background.Gradient1.Point2YPercent = 100
- StateClicked.Background.Gradient1.Sinus = False
- StateClicked.Background.Gradient2.StartColor = 7067903
- StateClicked.Background.Gradient2.StartColorOpacity = 255
- StateClicked.Background.Gradient2.DrawMode = dmSet
- StateClicked.Background.Gradient2.EndColor = 8515583
- StateClicked.Background.Gradient2.EndColorOpacity = 255
- StateClicked.Background.Gradient2.ColorCorrection = True
- StateClicked.Background.Gradient2.GradientType = gtLinear
- StateClicked.Background.Gradient2.Point1XPercent = 0
- StateClicked.Background.Gradient2.Point1YPercent = 0
- StateClicked.Background.Gradient2.Point2XPercent = 0
- StateClicked.Background.Gradient2.Point2YPercent = 100
- StateClicked.Background.Gradient2.Sinus = False
- StateClicked.Background.Gradient1EndPercent = 50
- StateClicked.Background.Style = bbsGradient
- StateClicked.Border.Color = 4170178
- StateClicked.Border.ColorOpacity = 255
- StateClicked.Border.LightColor = clGray
- StateClicked.Border.LightOpacity = 100
- StateClicked.Border.LightWidth = 1
- StateClicked.Border.Style = bboSolid
- StateClicked.Border.Width = 1
- StateClicked.FontEx.Color = clBlack
- StateClicked.FontEx.EndEllipsis = False
- StateClicked.FontEx.FontQuality = fqSystemClearType
- StateClicked.FontEx.Height = 0
- StateClicked.FontEx.SingleLine = True
- StateClicked.FontEx.Shadow = False
- StateClicked.FontEx.ShadowColor = clBlack
- StateClicked.FontEx.ShadowColorOpacity = 255
- StateClicked.FontEx.ShadowRadius = 5
- StateClicked.FontEx.ShadowOffsetX = 5
- StateClicked.FontEx.ShadowOffsetY = 5
- StateClicked.FontEx.Style = []
- StateClicked.FontEx.TextAlignment = bcaCenter
- StateClicked.FontEx.WordBreak = False
- StateHover.Background.Color = clBlack
- StateHover.Background.ColorOpacity = 255
- StateHover.Background.Gradient1.StartColor = 12448254
- StateHover.Background.Gradient1.StartColorOpacity = 255
- StateHover.Background.Gradient1.DrawMode = dmSet
- StateHover.Background.Gradient1.EndColor = 8840446
- StateHover.Background.Gradient1.EndColorOpacity = 255
- StateHover.Background.Gradient1.ColorCorrection = True
- StateHover.Background.Gradient1.GradientType = gtLinear
- StateHover.Background.Gradient1.Point1XPercent = 0
- StateHover.Background.Gradient1.Point1YPercent = 0
- StateHover.Background.Gradient1.Point2XPercent = 0
- StateHover.Background.Gradient1.Point2YPercent = 100
- StateHover.Background.Gradient1.Sinus = False
- StateHover.Background.Gradient2.StartColor = 8840446
- StateHover.Background.Gradient2.StartColorOpacity = 255
- StateHover.Background.Gradient2.DrawMode = dmSet
- StateHover.Background.Gradient2.EndColor = 12908798
- StateHover.Background.Gradient2.EndColorOpacity = 255
- StateHover.Background.Gradient2.ColorCorrection = True
- StateHover.Background.Gradient2.GradientType = gtLinear
- StateHover.Background.Gradient2.Point1XPercent = 0
- StateHover.Background.Gradient2.Point1YPercent = 0
- StateHover.Background.Gradient2.Point2XPercent = 0
- StateHover.Background.Gradient2.Point2YPercent = 100
- StateHover.Background.Gradient2.Sinus = False
- StateHover.Background.Gradient1EndPercent = 50
- StateHover.Background.Style = bbsGradient
- StateHover.Border.Color = 5362420
- StateHover.Border.ColorOpacity = 255
- StateHover.Border.LightColor = clWhite
- StateHover.Border.LightOpacity = 200
- StateHover.Border.LightWidth = 1
- StateHover.Border.Style = bboSolid
- StateHover.Border.Width = 1
- StateHover.FontEx.Color = clBlack
- StateHover.FontEx.EndEllipsis = False
- StateHover.FontEx.FontQuality = fqSystemClearType
- StateHover.FontEx.Height = 0
- StateHover.FontEx.SingleLine = True
- StateHover.FontEx.Shadow = False
- StateHover.FontEx.ShadowColor = clBlack
- StateHover.FontEx.ShadowColorOpacity = 255
- StateHover.FontEx.ShadowRadius = 5
- StateHover.FontEx.ShadowOffsetX = 5
- StateHover.FontEx.ShadowOffsetY = 5
- StateHover.FontEx.Style = []
- StateHover.FontEx.TextAlignment = bcaCenter
- StateHover.FontEx.WordBreak = False
- StateNormal.Background.Color = clBlack
- StateNormal.Background.ColorOpacity = 255
- StateNormal.Background.Gradient1.StartColor = clWhite
- StateNormal.Background.Gradient1.StartColorOpacity = 255
- StateNormal.Background.Gradient1.DrawMode = dmSet
- StateNormal.Background.Gradient1.EndColor = 15855597
- StateNormal.Background.Gradient1.EndColorOpacity = 255
- StateNormal.Background.Gradient1.ColorCorrection = True
- StateNormal.Background.Gradient1.GradientType = gtLinear
- StateNormal.Background.Gradient1.Point1XPercent = 0
- StateNormal.Background.Gradient1.Point1YPercent = 0
- StateNormal.Background.Gradient1.Point2XPercent = 0
- StateNormal.Background.Gradient1.Point2YPercent = 100
- StateNormal.Background.Gradient1.Sinus = False
- StateNormal.Background.Gradient2.StartColor = 13137169
- StateNormal.Background.Gradient2.StartColorOpacity = 255
- StateNormal.Background.Gradient2.DrawMode = dmSet
- StateNormal.Background.Gradient2.EndColor = 15722194
- StateNormal.Background.Gradient2.EndColorOpacity = 255
- StateNormal.Background.Gradient2.ColorCorrection = True
- StateNormal.Background.Gradient2.GradientType = gtLinear
- StateNormal.Background.Gradient2.Point1XPercent = 0
- StateNormal.Background.Gradient2.Point1YPercent = 0
- StateNormal.Background.Gradient2.Point2XPercent = 0
- StateNormal.Background.Gradient2.Point2YPercent = 100
- StateNormal.Background.Gradient2.Sinus = False
- StateNormal.Background.Gradient1EndPercent = 100
- StateNormal.Background.Style = bbsGradient
- StateNormal.Border.Color = 13816015
- StateNormal.Border.ColorOpacity = 255
- StateNormal.Border.LightColor = clWhite
- StateNormal.Border.LightOpacity = 255
- StateNormal.Border.LightWidth = 1
- StateNormal.Border.Style = bboSolid
- StateNormal.Border.Width = 1
- StateNormal.FontEx.Color = clBlack
- StateNormal.FontEx.EndEllipsis = False
- StateNormal.FontEx.FontQuality = fqSystemClearType
- StateNormal.FontEx.Height = 0
- StateNormal.FontEx.SingleLine = True
- StateNormal.FontEx.Shadow = False
- StateNormal.FontEx.ShadowColor = clBlack
- StateNormal.FontEx.ShadowColorOpacity = 255
- StateNormal.FontEx.ShadowRadius = 5
- StateNormal.FontEx.ShadowOffsetX = 5
- StateNormal.FontEx.ShadowOffsetY = 5
- StateNormal.FontEx.Style = []
- StateNormal.FontEx.TextAlignment = bcaCenter
- StateNormal.FontEx.WordBreak = False
- Caption = 'Commands'
- Color = clNone
- DropDownWidth = 16
- DropDownArrowSize = 8
- GlobalOpacity = 255
- Glyph.Data = {
- 36040000424D3604000000000000360000002800000010000000100000000100
- 2000000000000004000064000000640000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000000000008F0000
- 008F0000008F0000008F0000008F0000008F0000008F0000008F0000008F0000
- 008F0000008F0000008F0000008F0000008F0000008F0000008F000000B70000
- 00B7000000B7000000B7000000B7000000B7000000B7000000B7000000B70000
- 00B7000000B7000000B7000000B7000000B7000000B7000000B7000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 00000000000000000000000000000000000000000000000000000000009F0000
- 009F0000009F0000009F0000009F0000009F0000009F0000009F0000009F0000
- 009F0000009F0000009F0000009F0000009F0000009F0000009F0000009F0000
- 009F0000009F0000009F0000009F0000009F0000009F0000009F0000009F0000
- 009F0000009F0000009F0000009F0000009F0000009F0000009F000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000B70000
- 00B7000000B7000000B7000000B7000000B7000000B7000000B7000000B70000
- 00B7000000B7000000B7000000B7000000B7000000B7000000B70000008F0000
- 008F0000008F0000008F0000008F0000008F0000008F0000008F0000008F0000
- 008F0000008F0000008F0000008F0000008F0000008F0000008F000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000
- }
- OnClick = BCButton1Click
- ParentColor = False
- Rounding.RoundX = 3
- Rounding.RoundY = 3
- Rounding.RoundOptions = []
- RoundingDropDown.RoundX = 1
- RoundingDropDown.RoundY = 1
- RoundingDropDown.RoundOptions = []
- TextApplyGlobalOpacity = False
- end
- end
- object ListBox1: TListBox
- Left = 512
- Height = 220
- Top = 56
- Width = 648
- Anchors = [akTop, akLeft, akRight]
- ItemHeight = 0
- OnDblClick = ListBox1DblClick
- TabOrder = 3
- Visible = False
- end
- object SynCompletion1: TSynCompletion
- Position = 0
- LinesInWindow = 6
- SelectedColor = clHighlight
- CaseSensitive = False
- Width = 500
- LongLineHintType = sclpNone
- ShortCut = 16416
- EndOfTokenChr = '()[].'
- ExecCommandID = ecSynCompletionExecute
- Editor = SynEdit1
- left = 664
- top = 248
- end
- object SynAnySyn1: TSynAnySyn
- Enabled = False
- CommentAttri.Foreground = clGreen
- CommentAttri.FrameEdges = sfeAround
- Comments = [csPasStyle]
- DetectPreprocessor = False
- IdentifierAttri.FrameEdges = sfeAround
- IdentifierChars = '!"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~'
- KeyAttri.FrameEdges = sfeAround
- ConstantAttri.FrameEdges = sfeAround
- ObjectAttri.FrameEdges = sfeAround
- EntityAttri.FrameEdges = sfeAround
- VariableAttri.FrameEdges = sfeAround
- DotAttri.FrameEdges = sfeAround
- KeyWords.Strings = (
- 'GOTO'
- 'INPUT'
- 'LET'
- 'PRINT'
- )
- NumberAttri.Foreground = clMaroon
- NumberAttri.FrameEdges = sfeAround
- PreprocessorAttri.FrameEdges = sfeAround
- SpaceAttri.FrameEdges = sfeAround
- StringAttri.Foreground = 16744448
- StringAttri.FrameEdges = sfeAround
- SymbolAttri.Foreground = 4227327
- SymbolAttri.FrameEdges = sfeAround
- StringDelim = sdDoubleQuote
- Markup = False
- Entity = False
- DollarVariables = False
- ActiveDot = False
- left = 248
- top = 112
- end
- end
|