umain.lfm 27 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884
  1. object Form1: TForm1
  2. Left = 340
  3. Height = 628
  4. Top = 150
  5. Width = 1172
  6. Caption = 'BGRAScript'
  7. ClientHeight = 628
  8. ClientWidth = 1172
  9. Color = 15790320
  10. OnCreate = FormCreate
  11. Position = poDesktopCenter
  12. ShowHint = True
  13. LCLVersion = '1.2.4.0'
  14. inline SynEdit1: TSynEdit
  15. Left = 0
  16. Height = 343
  17. Hint = 'Ctrl + Spacebar to show templates.'
  18. Top = 285
  19. Width = 1172
  20. Align = alBottom
  21. Anchors = [akTop, akLeft, akRight, akBottom]
  22. Font.Height = -16
  23. Font.Name = 'Courier New'
  24. Font.Pitch = fpFixed
  25. Font.Quality = fqCleartypeNatural
  26. ParentColor = False
  27. ParentFont = False
  28. TabOrder = 0
  29. Gutter.Width = 61
  30. Gutter.MouseActions = <>
  31. RightGutter.Width = 0
  32. RightGutter.MouseActions = <>
  33. Highlighter = SynAnySyn1
  34. Keystrokes = <
  35. item
  36. Command = ecUp
  37. ShortCut = 38
  38. end
  39. item
  40. Command = ecSelUp
  41. ShortCut = 8230
  42. end
  43. item
  44. Command = ecScrollUp
  45. ShortCut = 16422
  46. end
  47. item
  48. Command = ecDown
  49. ShortCut = 40
  50. end
  51. item
  52. Command = ecSelDown
  53. ShortCut = 8232
  54. end
  55. item
  56. Command = ecScrollDown
  57. ShortCut = 16424
  58. end
  59. item
  60. Command = ecLeft
  61. ShortCut = 37
  62. end
  63. item
  64. Command = ecSelLeft
  65. ShortCut = 8229
  66. end
  67. item
  68. Command = ecWordLeft
  69. ShortCut = 16421
  70. end
  71. item
  72. Command = ecSelWordLeft
  73. ShortCut = 24613
  74. end
  75. item
  76. Command = ecRight
  77. ShortCut = 39
  78. end
  79. item
  80. Command = ecSelRight
  81. ShortCut = 8231
  82. end
  83. item
  84. Command = ecWordRight
  85. ShortCut = 16423
  86. end
  87. item
  88. Command = ecSelWordRight
  89. ShortCut = 24615
  90. end
  91. item
  92. Command = ecPageDown
  93. ShortCut = 34
  94. end
  95. item
  96. Command = ecSelPageDown
  97. ShortCut = 8226
  98. end
  99. item
  100. Command = ecPageBottom
  101. ShortCut = 16418
  102. end
  103. item
  104. Command = ecSelPageBottom
  105. ShortCut = 24610
  106. end
  107. item
  108. Command = ecPageUp
  109. ShortCut = 33
  110. end
  111. item
  112. Command = ecSelPageUp
  113. ShortCut = 8225
  114. end
  115. item
  116. Command = ecPageTop
  117. ShortCut = 16417
  118. end
  119. item
  120. Command = ecSelPageTop
  121. ShortCut = 24609
  122. end
  123. item
  124. Command = ecLineStart
  125. ShortCut = 36
  126. end
  127. item
  128. Command = ecSelLineStart
  129. ShortCut = 8228
  130. end
  131. item
  132. Command = ecEditorTop
  133. ShortCut = 16420
  134. end
  135. item
  136. Command = ecSelEditorTop
  137. ShortCut = 24612
  138. end
  139. item
  140. Command = ecLineEnd
  141. ShortCut = 35
  142. end
  143. item
  144. Command = ecSelLineEnd
  145. ShortCut = 8227
  146. end
  147. item
  148. Command = ecEditorBottom
  149. ShortCut = 16419
  150. end
  151. item
  152. Command = ecSelEditorBottom
  153. ShortCut = 24611
  154. end
  155. item
  156. Command = ecToggleMode
  157. ShortCut = 45
  158. end
  159. item
  160. Command = ecCopy
  161. ShortCut = 16429
  162. end
  163. item
  164. Command = ecPaste
  165. ShortCut = 8237
  166. end
  167. item
  168. Command = ecDeleteChar
  169. ShortCut = 46
  170. end
  171. item
  172. Command = ecCut
  173. ShortCut = 8238
  174. end
  175. item
  176. Command = ecDeleteLastChar
  177. ShortCut = 8
  178. end
  179. item
  180. Command = ecDeleteLastChar
  181. ShortCut = 8200
  182. end
  183. item
  184. Command = ecDeleteLastWord
  185. ShortCut = 16392
  186. end
  187. item
  188. Command = ecUndo
  189. ShortCut = 32776
  190. end
  191. item
  192. Command = ecRedo
  193. ShortCut = 40968
  194. end
  195. item
  196. Command = ecLineBreak
  197. ShortCut = 13
  198. end
  199. item
  200. Command = ecSelectAll
  201. ShortCut = 16449
  202. end
  203. item
  204. Command = ecCopy
  205. ShortCut = 16451
  206. end
  207. item
  208. Command = ecBlockIndent
  209. ShortCut = 24649
  210. end
  211. item
  212. Command = ecLineBreak
  213. ShortCut = 16461
  214. end
  215. item
  216. Command = ecInsertLine
  217. ShortCut = 16462
  218. end
  219. item
  220. Command = ecDeleteWord
  221. ShortCut = 16468
  222. end
  223. item
  224. Command = ecBlockUnindent
  225. ShortCut = 24661
  226. end
  227. item
  228. Command = ecPaste
  229. ShortCut = 16470
  230. end
  231. item
  232. Command = ecCut
  233. ShortCut = 16472
  234. end
  235. item
  236. Command = ecDeleteLine
  237. ShortCut = 16473
  238. end
  239. item
  240. Command = ecDeleteEOL
  241. ShortCut = 24665
  242. end
  243. item
  244. Command = ecUndo
  245. ShortCut = 16474
  246. end
  247. item
  248. Command = ecRedo
  249. ShortCut = 24666
  250. end
  251. item
  252. Command = ecGotoMarker0
  253. ShortCut = 16432
  254. end
  255. item
  256. Command = ecGotoMarker1
  257. ShortCut = 16433
  258. end
  259. item
  260. Command = ecGotoMarker2
  261. ShortCut = 16434
  262. end
  263. item
  264. Command = ecGotoMarker3
  265. ShortCut = 16435
  266. end
  267. item
  268. Command = ecGotoMarker4
  269. ShortCut = 16436
  270. end
  271. item
  272. Command = ecGotoMarker5
  273. ShortCut = 16437
  274. end
  275. item
  276. Command = ecGotoMarker6
  277. ShortCut = 16438
  278. end
  279. item
  280. Command = ecGotoMarker7
  281. ShortCut = 16439
  282. end
  283. item
  284. Command = ecGotoMarker8
  285. ShortCut = 16440
  286. end
  287. item
  288. Command = ecGotoMarker9
  289. ShortCut = 16441
  290. end
  291. item
  292. Command = ecSetMarker0
  293. ShortCut = 24624
  294. end
  295. item
  296. Command = ecSetMarker1
  297. ShortCut = 24625
  298. end
  299. item
  300. Command = ecSetMarker2
  301. ShortCut = 24626
  302. end
  303. item
  304. Command = ecSetMarker3
  305. ShortCut = 24627
  306. end
  307. item
  308. Command = ecSetMarker4
  309. ShortCut = 24628
  310. end
  311. item
  312. Command = ecSetMarker5
  313. ShortCut = 24629
  314. end
  315. item
  316. Command = ecSetMarker6
  317. ShortCut = 24630
  318. end
  319. item
  320. Command = ecSetMarker7
  321. ShortCut = 24631
  322. end
  323. item
  324. Command = ecSetMarker8
  325. ShortCut = 24632
  326. end
  327. item
  328. Command = ecSetMarker9
  329. ShortCut = 24633
  330. end
  331. item
  332. Command = EcFoldLevel1
  333. ShortCut = 41009
  334. end
  335. item
  336. Command = EcFoldLevel2
  337. ShortCut = 41010
  338. end
  339. item
  340. Command = EcFoldLevel1
  341. ShortCut = 41011
  342. end
  343. item
  344. Command = EcFoldLevel1
  345. ShortCut = 41012
  346. end
  347. item
  348. Command = EcFoldLevel1
  349. ShortCut = 41013
  350. end
  351. item
  352. Command = EcFoldLevel6
  353. ShortCut = 41014
  354. end
  355. item
  356. Command = EcFoldLevel7
  357. ShortCut = 41015
  358. end
  359. item
  360. Command = EcFoldLevel8
  361. ShortCut = 41016
  362. end
  363. item
  364. Command = EcFoldLevel9
  365. ShortCut = 41017
  366. end
  367. item
  368. Command = EcFoldLevel0
  369. ShortCut = 41008
  370. end
  371. item
  372. Command = EcFoldCurrent
  373. ShortCut = 41005
  374. end
  375. item
  376. Command = EcUnFoldCurrent
  377. ShortCut = 41003
  378. end
  379. item
  380. Command = EcToggleMarkupWord
  381. ShortCut = 32845
  382. end
  383. item
  384. Command = ecNormalSelect
  385. ShortCut = 24654
  386. end
  387. item
  388. Command = ecColumnSelect
  389. ShortCut = 24643
  390. end
  391. item
  392. Command = ecLineSelect
  393. ShortCut = 24652
  394. end
  395. item
  396. Command = ecTab
  397. ShortCut = 9
  398. end
  399. item
  400. Command = ecShiftTab
  401. ShortCut = 8201
  402. end
  403. item
  404. Command = ecMatchBracket
  405. ShortCut = 24642
  406. end
  407. item
  408. Command = ecColSelUp
  409. ShortCut = 40998
  410. end
  411. item
  412. Command = ecColSelDown
  413. ShortCut = 41000
  414. end
  415. item
  416. Command = ecColSelLeft
  417. ShortCut = 40997
  418. end
  419. item
  420. Command = ecColSelRight
  421. ShortCut = 40999
  422. end
  423. item
  424. Command = ecColSelPageDown
  425. ShortCut = 40994
  426. end
  427. item
  428. Command = ecColSelPageBottom
  429. ShortCut = 57378
  430. end
  431. item
  432. Command = ecColSelPageUp
  433. ShortCut = 40993
  434. end
  435. item
  436. Command = ecColSelPageTop
  437. ShortCut = 57377
  438. end
  439. item
  440. Command = ecColSelLineStart
  441. ShortCut = 40996
  442. end
  443. item
  444. Command = ecColSelLineEnd
  445. ShortCut = 40995
  446. end
  447. item
  448. Command = ecColSelEditorTop
  449. ShortCut = 57380
  450. end
  451. item
  452. Command = ecColSelEditorBottom
  453. ShortCut = 57379
  454. end>
  455. MouseActions = <>
  456. MouseTextActions = <>
  457. MouseSelActions = <>
  458. Lines.Strings = (
  459. '{ BGRAScript }'
  460. 'FillTransparent'
  461. ''
  462. '// "store some values"'
  463. 'let oneh 100'
  464. 'let drawmode "dmDrawWithTransparency"'
  465. 'let blendmode "boTransparent"'
  466. 'let filename "file.png"'
  467. 'let color1 "rgba(250,250,250,1)"'
  468. 'let color2 "rgba(255,255,255,1)"'
  469. 'GetWidth width'
  470. 'GetHeight height'
  471. ''
  472. '// "Draw rectangles, lines and bitmap"'
  473. 'Rectangle 0,0,oneh,oneh,"rgba(0,0,0,0.6)",color1,drawmode'
  474. 'Rectangle 20,20,80,80,"rgba(0,0,0,0.4)",color2,drawmode'
  475. 'SetHorizLine 0,10,98,"rgba(0,0,0,.3)"'
  476. 'SetVertLine 90,1,98,"rgba(0,0,0,.3)"'
  477. 'BlendBitmap 26,26,"test.png",blendmode'
  478. ''
  479. '// "Save and weird things step 1"'
  480. 'SaveToFile filename'
  481. 'Negative'
  482. 'BlendBitmap 0,oneh,filename,blendmode'
  483. ''
  484. '// "Save and weird things step 2"'
  485. 'SaveToFile filename'
  486. 'Negative'
  487. 'FilterFastBlur 3,"False"'
  488. 'BlendBitmap oneh,0,filename,blendmode'
  489. ''
  490. '// "Flip the world and save it"'
  491. 'VerticalFlip 0,0,100,100'
  492. 'HorizontalFlip 100,100,200,200'
  493. 'VerticalFlip 100,0,200,100'
  494. 'HorizontalFlip 100,0,200,100'
  495. 'SaveToFile filename'
  496. '// "goto line (skip all the intermediate lines)"'
  497. 'goto 47'
  498. ''
  499. '// "Weird things level 3"'
  500. 'DrawCheckers 200,0,300,300,"rgba(100,100,100,255)","rgba(0,0,0,0)"'
  501. 'InplaceGrayscaleRect 0,0,100,100'
  502. 'FilterSmooth "False"'
  503. 'ApplyBitmapMask filename,100,100,200,200,0,100'
  504. ''
  505. 'DrawHorizLine 0,0,width,"rgba(0,0,0,1)"'
  506. 'DrawVertLine 0,0,height,"rgba(0,0,0,1)"'
  507. ''
  508. '// "Save this in your hard disk (again)"'
  509. 'SaveToFile filename'
  510. 'print "End: ''",filename,"'' saved!"'
  511. )
  512. VisibleSpecialChars = [vscSpace, vscTabAtLast]
  513. SelectedColor.FrameEdges = sfeAround
  514. SelectedColor.BackPriority = 50
  515. SelectedColor.ForePriority = 50
  516. SelectedColor.FramePriority = 50
  517. SelectedColor.BoldPriority = 50
  518. SelectedColor.ItalicPriority = 50
  519. SelectedColor.UnderlinePriority = 50
  520. SelectedColor.StrikeOutPriority = 50
  521. IncrementColor.FrameEdges = sfeAround
  522. HighlightAllColor.FrameEdges = sfeAround
  523. BracketHighlightStyle = sbhsBoth
  524. BracketMatchColor.Background = clNone
  525. BracketMatchColor.Foreground = clNone
  526. BracketMatchColor.FrameEdges = sfeAround
  527. BracketMatchColor.Style = [fsBold]
  528. FoldedCodeColor.Background = clNone
  529. FoldedCodeColor.Foreground = clGray
  530. FoldedCodeColor.FrameColor = clGray
  531. FoldedCodeColor.FrameEdges = sfeAround
  532. MouseLinkColor.Background = clNone
  533. MouseLinkColor.Foreground = clBlue
  534. MouseLinkColor.FrameEdges = sfeAround
  535. LineHighlightColor.Background = clNone
  536. LineHighlightColor.Foreground = clNone
  537. LineHighlightColor.FrameEdges = sfeAround
  538. inline SynLeftGutterPartList1: TSynGutterPartList
  539. object SynGutterMarks1: TSynGutterMarks
  540. Width = 24
  541. MouseActions = <>
  542. end
  543. object SynGutterLineNumber1: TSynGutterLineNumber
  544. Width = 21
  545. MouseActions = <>
  546. MarkupInfo.Background = clBtnFace
  547. MarkupInfo.Foreground = clNone
  548. MarkupInfo.FrameEdges = sfeAround
  549. DigitCount = 2
  550. ShowOnlyLineNumbersMultiplesOf = 1
  551. ZeroStart = False
  552. LeadingZeros = False
  553. end
  554. object SynGutterChanges1: TSynGutterChanges
  555. Width = 4
  556. MouseActions = <>
  557. ModifiedColor = 59900
  558. SavedColor = clGreen
  559. end
  560. object SynGutterSeparator1: TSynGutterSeparator
  561. Width = 2
  562. MouseActions = <>
  563. MarkupInfo.Background = clWhite
  564. MarkupInfo.Foreground = clGray
  565. MarkupInfo.FrameEdges = sfeAround
  566. end
  567. object SynGutterCodeFolding1: TSynGutterCodeFolding
  568. MouseActions = <>
  569. MarkupInfo.Background = clNone
  570. MarkupInfo.Foreground = clGray
  571. MarkupInfo.FrameEdges = sfeAround
  572. MouseActionsExpanded = <>
  573. MouseActionsCollapsed = <>
  574. end
  575. end
  576. end
  577. object Splitter1: TSplitter
  578. Cursor = crVSplit
  579. Left = 0
  580. Height = 5
  581. Top = 280
  582. Width = 1172
  583. Align = alBottom
  584. ResizeAnchor = akBottom
  585. end
  586. object BGRAGraphicControl1: TBGRAGraphicControl
  587. Left = 8
  588. Height = 220
  589. Hint = 'Click to update.'
  590. Top = 56
  591. Width = 496
  592. OnRedraw = BGRAGraphicControl1Redraw
  593. Color = clWhite
  594. ColorOpacity = 128
  595. Alignment = taCenter
  596. OnClick = BGRAGraphicControl1Click
  597. Caption = 'BGRAGraphicControl1'
  598. end
  599. object BGRAVirtualScreen1: TBGRAVirtualScreen
  600. Left = 0
  601. Height = 50
  602. Top = 0
  603. Width = 1172
  604. OnRedraw = BGRAVirtualScreen1Redraw
  605. Align = alTop
  606. Alignment = taLeftJustify
  607. ChildSizing.LeftRightSpacing = 8
  608. ChildSizing.TopBottomSpacing = 8
  609. ChildSizing.HorizontalSpacing = 8
  610. ChildSizing.VerticalSpacing = 8
  611. ChildSizing.Layout = cclTopToBottomThenLeftToRight
  612. ClientHeight = 50
  613. ClientWidth = 1172
  614. Color = clWhite
  615. ParentColor = False
  616. TabOrder = 2
  617. object BCButton1: TBCButton
  618. Left = 1026
  619. Height = 32
  620. Top = 9
  621. Width = 137
  622. Align = alRight
  623. AutoSize = True
  624. StateClicked.Background.Color = clBlack
  625. StateClicked.Background.ColorOpacity = 255
  626. StateClicked.Background.Gradient1.StartColor = 7726591
  627. StateClicked.Background.Gradient1.StartColorOpacity = 255
  628. StateClicked.Background.Gradient1.DrawMode = dmSet
  629. StateClicked.Background.Gradient1.EndColor = 7067903
  630. StateClicked.Background.Gradient1.EndColorOpacity = 255
  631. StateClicked.Background.Gradient1.ColorCorrection = True
  632. StateClicked.Background.Gradient1.GradientType = gtLinear
  633. StateClicked.Background.Gradient1.Point1XPercent = 0
  634. StateClicked.Background.Gradient1.Point1YPercent = 0
  635. StateClicked.Background.Gradient1.Point2XPercent = 0
  636. StateClicked.Background.Gradient1.Point2YPercent = 100
  637. StateClicked.Background.Gradient1.Sinus = False
  638. StateClicked.Background.Gradient2.StartColor = 7067903
  639. StateClicked.Background.Gradient2.StartColorOpacity = 255
  640. StateClicked.Background.Gradient2.DrawMode = dmSet
  641. StateClicked.Background.Gradient2.EndColor = 8515583
  642. StateClicked.Background.Gradient2.EndColorOpacity = 255
  643. StateClicked.Background.Gradient2.ColorCorrection = True
  644. StateClicked.Background.Gradient2.GradientType = gtLinear
  645. StateClicked.Background.Gradient2.Point1XPercent = 0
  646. StateClicked.Background.Gradient2.Point1YPercent = 0
  647. StateClicked.Background.Gradient2.Point2XPercent = 0
  648. StateClicked.Background.Gradient2.Point2YPercent = 100
  649. StateClicked.Background.Gradient2.Sinus = False
  650. StateClicked.Background.Gradient1EndPercent = 50
  651. StateClicked.Background.Style = bbsGradient
  652. StateClicked.Border.Color = 4170178
  653. StateClicked.Border.ColorOpacity = 255
  654. StateClicked.Border.LightColor = clGray
  655. StateClicked.Border.LightOpacity = 100
  656. StateClicked.Border.LightWidth = 1
  657. StateClicked.Border.Style = bboSolid
  658. StateClicked.Border.Width = 1
  659. StateClicked.FontEx.Color = clBlack
  660. StateClicked.FontEx.EndEllipsis = False
  661. StateClicked.FontEx.FontQuality = fqSystemClearType
  662. StateClicked.FontEx.Height = 0
  663. StateClicked.FontEx.SingleLine = True
  664. StateClicked.FontEx.Shadow = False
  665. StateClicked.FontEx.ShadowColor = clBlack
  666. StateClicked.FontEx.ShadowColorOpacity = 255
  667. StateClicked.FontEx.ShadowRadius = 5
  668. StateClicked.FontEx.ShadowOffsetX = 5
  669. StateClicked.FontEx.ShadowOffsetY = 5
  670. StateClicked.FontEx.Style = []
  671. StateClicked.FontEx.TextAlignment = bcaCenter
  672. StateClicked.FontEx.WordBreak = False
  673. StateHover.Background.Color = clBlack
  674. StateHover.Background.ColorOpacity = 255
  675. StateHover.Background.Gradient1.StartColor = 12448254
  676. StateHover.Background.Gradient1.StartColorOpacity = 255
  677. StateHover.Background.Gradient1.DrawMode = dmSet
  678. StateHover.Background.Gradient1.EndColor = 8840446
  679. StateHover.Background.Gradient1.EndColorOpacity = 255
  680. StateHover.Background.Gradient1.ColorCorrection = True
  681. StateHover.Background.Gradient1.GradientType = gtLinear
  682. StateHover.Background.Gradient1.Point1XPercent = 0
  683. StateHover.Background.Gradient1.Point1YPercent = 0
  684. StateHover.Background.Gradient1.Point2XPercent = 0
  685. StateHover.Background.Gradient1.Point2YPercent = 100
  686. StateHover.Background.Gradient1.Sinus = False
  687. StateHover.Background.Gradient2.StartColor = 8840446
  688. StateHover.Background.Gradient2.StartColorOpacity = 255
  689. StateHover.Background.Gradient2.DrawMode = dmSet
  690. StateHover.Background.Gradient2.EndColor = 12908798
  691. StateHover.Background.Gradient2.EndColorOpacity = 255
  692. StateHover.Background.Gradient2.ColorCorrection = True
  693. StateHover.Background.Gradient2.GradientType = gtLinear
  694. StateHover.Background.Gradient2.Point1XPercent = 0
  695. StateHover.Background.Gradient2.Point1YPercent = 0
  696. StateHover.Background.Gradient2.Point2XPercent = 0
  697. StateHover.Background.Gradient2.Point2YPercent = 100
  698. StateHover.Background.Gradient2.Sinus = False
  699. StateHover.Background.Gradient1EndPercent = 50
  700. StateHover.Background.Style = bbsGradient
  701. StateHover.Border.Color = 5362420
  702. StateHover.Border.ColorOpacity = 255
  703. StateHover.Border.LightColor = clWhite
  704. StateHover.Border.LightOpacity = 200
  705. StateHover.Border.LightWidth = 1
  706. StateHover.Border.Style = bboSolid
  707. StateHover.Border.Width = 1
  708. StateHover.FontEx.Color = clBlack
  709. StateHover.FontEx.EndEllipsis = False
  710. StateHover.FontEx.FontQuality = fqSystemClearType
  711. StateHover.FontEx.Height = 0
  712. StateHover.FontEx.SingleLine = True
  713. StateHover.FontEx.Shadow = False
  714. StateHover.FontEx.ShadowColor = clBlack
  715. StateHover.FontEx.ShadowColorOpacity = 255
  716. StateHover.FontEx.ShadowRadius = 5
  717. StateHover.FontEx.ShadowOffsetX = 5
  718. StateHover.FontEx.ShadowOffsetY = 5
  719. StateHover.FontEx.Style = []
  720. StateHover.FontEx.TextAlignment = bcaCenter
  721. StateHover.FontEx.WordBreak = False
  722. StateNormal.Background.Color = clBlack
  723. StateNormal.Background.ColorOpacity = 255
  724. StateNormal.Background.Gradient1.StartColor = clWhite
  725. StateNormal.Background.Gradient1.StartColorOpacity = 255
  726. StateNormal.Background.Gradient1.DrawMode = dmSet
  727. StateNormal.Background.Gradient1.EndColor = 15855597
  728. StateNormal.Background.Gradient1.EndColorOpacity = 255
  729. StateNormal.Background.Gradient1.ColorCorrection = True
  730. StateNormal.Background.Gradient1.GradientType = gtLinear
  731. StateNormal.Background.Gradient1.Point1XPercent = 0
  732. StateNormal.Background.Gradient1.Point1YPercent = 0
  733. StateNormal.Background.Gradient1.Point2XPercent = 0
  734. StateNormal.Background.Gradient1.Point2YPercent = 100
  735. StateNormal.Background.Gradient1.Sinus = False
  736. StateNormal.Background.Gradient2.StartColor = 13137169
  737. StateNormal.Background.Gradient2.StartColorOpacity = 255
  738. StateNormal.Background.Gradient2.DrawMode = dmSet
  739. StateNormal.Background.Gradient2.EndColor = 15722194
  740. StateNormal.Background.Gradient2.EndColorOpacity = 255
  741. StateNormal.Background.Gradient2.ColorCorrection = True
  742. StateNormal.Background.Gradient2.GradientType = gtLinear
  743. StateNormal.Background.Gradient2.Point1XPercent = 0
  744. StateNormal.Background.Gradient2.Point1YPercent = 0
  745. StateNormal.Background.Gradient2.Point2XPercent = 0
  746. StateNormal.Background.Gradient2.Point2YPercent = 100
  747. StateNormal.Background.Gradient2.Sinus = False
  748. StateNormal.Background.Gradient1EndPercent = 100
  749. StateNormal.Background.Style = bbsGradient
  750. StateNormal.Border.Color = 13816015
  751. StateNormal.Border.ColorOpacity = 255
  752. StateNormal.Border.LightColor = clWhite
  753. StateNormal.Border.LightOpacity = 255
  754. StateNormal.Border.LightWidth = 1
  755. StateNormal.Border.Style = bboSolid
  756. StateNormal.Border.Width = 1
  757. StateNormal.FontEx.Color = clBlack
  758. StateNormal.FontEx.EndEllipsis = False
  759. StateNormal.FontEx.FontQuality = fqSystemClearType
  760. StateNormal.FontEx.Height = 0
  761. StateNormal.FontEx.SingleLine = True
  762. StateNormal.FontEx.Shadow = False
  763. StateNormal.FontEx.ShadowColor = clBlack
  764. StateNormal.FontEx.ShadowColorOpacity = 255
  765. StateNormal.FontEx.ShadowRadius = 5
  766. StateNormal.FontEx.ShadowOffsetX = 5
  767. StateNormal.FontEx.ShadowOffsetY = 5
  768. StateNormal.FontEx.Style = []
  769. StateNormal.FontEx.TextAlignment = bcaCenter
  770. StateNormal.FontEx.WordBreak = False
  771. Caption = 'Commands'
  772. Color = clNone
  773. DropDownWidth = 16
  774. DropDownArrowSize = 8
  775. GlobalOpacity = 255
  776. Glyph.Data = {
  777. 36040000424D3604000000000000360000002800000010000000100000000100
  778. 2000000000000004000064000000640000000000000000000000000000000000
  779. 0000000000000000000000000000000000000000000000000000000000000000
  780. 0000000000000000000000000000000000000000000000000000000000000000
  781. 0000000000000000000000000000000000000000000000000000000000000000
  782. 00000000000000000000000000000000000000000000000000000000008F0000
  783. 008F0000008F0000008F0000008F0000008F0000008F0000008F0000008F0000
  784. 008F0000008F0000008F0000008F0000008F0000008F0000008F000000B70000
  785. 00B7000000B7000000B7000000B7000000B7000000B7000000B7000000B70000
  786. 00B7000000B7000000B7000000B7000000B7000000B7000000B7000000000000
  787. 0000000000000000000000000000000000000000000000000000000000000000
  788. 0000000000000000000000000000000000000000000000000000000000000000
  789. 0000000000000000000000000000000000000000000000000000000000000000
  790. 0000000000000000000000000000000000000000000000000000000000000000
  791. 0000000000000000000000000000000000000000000000000000000000000000
  792. 00000000000000000000000000000000000000000000000000000000009F0000
  793. 009F0000009F0000009F0000009F0000009F0000009F0000009F0000009F0000
  794. 009F0000009F0000009F0000009F0000009F0000009F0000009F0000009F0000
  795. 009F0000009F0000009F0000009F0000009F0000009F0000009F0000009F0000
  796. 009F0000009F0000009F0000009F0000009F0000009F0000009F000000000000
  797. 0000000000000000000000000000000000000000000000000000000000000000
  798. 0000000000000000000000000000000000000000000000000000000000000000
  799. 0000000000000000000000000000000000000000000000000000000000000000
  800. 0000000000000000000000000000000000000000000000000000000000000000
  801. 0000000000000000000000000000000000000000000000000000000000000000
  802. 0000000000000000000000000000000000000000000000000000000000B70000
  803. 00B7000000B7000000B7000000B7000000B7000000B7000000B7000000B70000
  804. 00B7000000B7000000B7000000B7000000B7000000B7000000B70000008F0000
  805. 008F0000008F0000008F0000008F0000008F0000008F0000008F0000008F0000
  806. 008F0000008F0000008F0000008F0000008F0000008F0000008F000000000000
  807. 0000000000000000000000000000000000000000000000000000000000000000
  808. 0000000000000000000000000000000000000000000000000000000000000000
  809. 0000000000000000000000000000000000000000000000000000000000000000
  810. 0000000000000000000000000000000000000000000000000000
  811. }
  812. OnClick = BCButton1Click
  813. ParentColor = False
  814. Rounding.RoundX = 3
  815. Rounding.RoundY = 3
  816. Rounding.RoundOptions = []
  817. RoundingDropDown.RoundX = 1
  818. RoundingDropDown.RoundY = 1
  819. RoundingDropDown.RoundOptions = []
  820. TextApplyGlobalOpacity = False
  821. end
  822. end
  823. object ListBox1: TListBox
  824. Left = 512
  825. Height = 220
  826. Top = 56
  827. Width = 648
  828. Anchors = [akTop, akLeft, akRight]
  829. ItemHeight = 0
  830. OnDblClick = ListBox1DblClick
  831. TabOrder = 3
  832. Visible = False
  833. end
  834. object SynCompletion1: TSynCompletion
  835. Position = 0
  836. LinesInWindow = 6
  837. SelectedColor = clHighlight
  838. CaseSensitive = False
  839. Width = 500
  840. LongLineHintType = sclpNone
  841. ShortCut = 16416
  842. EndOfTokenChr = '()[].'
  843. ExecCommandID = ecSynCompletionExecute
  844. Editor = SynEdit1
  845. left = 664
  846. top = 248
  847. end
  848. object SynAnySyn1: TSynAnySyn
  849. Enabled = False
  850. CommentAttri.Foreground = clGreen
  851. CommentAttri.FrameEdges = sfeAround
  852. Comments = [csPasStyle]
  853. DetectPreprocessor = False
  854. IdentifierAttri.FrameEdges = sfeAround
  855. IdentifierChars = '!"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~'
  856. KeyAttri.FrameEdges = sfeAround
  857. ConstantAttri.FrameEdges = sfeAround
  858. ObjectAttri.FrameEdges = sfeAround
  859. EntityAttri.FrameEdges = sfeAround
  860. VariableAttri.FrameEdges = sfeAround
  861. DotAttri.FrameEdges = sfeAround
  862. KeyWords.Strings = (
  863. 'GOTO'
  864. 'INPUT'
  865. 'LET'
  866. 'PRINT'
  867. )
  868. NumberAttri.Foreground = clMaroon
  869. NumberAttri.FrameEdges = sfeAround
  870. PreprocessorAttri.FrameEdges = sfeAround
  871. SpaceAttri.FrameEdges = sfeAround
  872. StringAttri.Foreground = 16744448
  873. StringAttri.FrameEdges = sfeAround
  874. SymbolAttri.Foreground = 4227327
  875. SymbolAttri.FrameEdges = sfeAround
  876. StringDelim = sdDoubleQuote
  877. Markup = False
  878. Entity = False
  879. DollarVariables = False
  880. ActiveDot = False
  881. left = 248
  882. top = 112
  883. end
  884. end