source: trunk/Forms/FormSourceCode.lfm

Last change on this file was 145, checked in by chronos, 11 months ago
  • Modified: Remove U prefix from unit names.
  • Modified: Updated Common package.
File size: 16.6 KB
Line 
1object FormSourceCode: TFormSourceCode
2 Left = 459
3 Height = 589
4 Top = 278
5 Width = 672
6 Caption = 'Source code'
7 ClientHeight = 589
8 ClientWidth = 672
9 DesignTimePPI = 144
10 OnCreate = FormCreate
11 OnDestroy = FormDestroy
12 LCLVersion = '2.2.6.0'
13 inline SynEditSource: TSynEdit
14 Left = 0
15 Height = 589
16 Top = 0
17 Width = 672
18 Align = alClient
19 Font.Height = -16
20 Font.Name = 'Courier New'
21 Font.Pitch = fpFixed
22 Font.Quality = fqNonAntialiased
23 ParentColor = False
24 ParentFont = False
25 PopupMenu = PopupMenuSource
26 TabOrder = 0
27 OnKeyDown = MemoSourceKeyDown
28 OnKeyPress = MemoSourceKeyPress
29 OnKeyUp = MemoSourceKeyUp
30 OnMouseDown = MemoSourceMouseDown
31 Gutter.Width = 80
32 Gutter.MouseActions = <>
33 RightGutter.Width = 0
34 RightGutter.MouseActions = <>
35 Keystrokes = <
36 item
37 Command = ecUp
38 ShortCut = 38
39 end
40 item
41 Command = ecSelUp
42 ShortCut = 8230
43 end
44 item
45 Command = ecScrollUp
46 ShortCut = 16422
47 end
48 item
49 Command = ecDown
50 ShortCut = 40
51 end
52 item
53 Command = ecSelDown
54 ShortCut = 8232
55 end
56 item
57 Command = ecScrollDown
58 ShortCut = 16424
59 end
60 item
61 Command = ecLeft
62 ShortCut = 37
63 end
64 item
65 Command = ecSelLeft
66 ShortCut = 8229
67 end
68 item
69 Command = ecWordLeft
70 ShortCut = 16421
71 end
72 item
73 Command = ecSelWordLeft
74 ShortCut = 24613
75 end
76 item
77 Command = ecRight
78 ShortCut = 39
79 end
80 item
81 Command = ecSelRight
82 ShortCut = 8231
83 end
84 item
85 Command = ecWordRight
86 ShortCut = 16423
87 end
88 item
89 Command = ecSelWordRight
90 ShortCut = 24615
91 end
92 item
93 Command = ecPageDown
94 ShortCut = 34
95 end
96 item
97 Command = ecSelPageDown
98 ShortCut = 8226
99 end
100 item
101 Command = ecPageBottom
102 ShortCut = 16418
103 end
104 item
105 Command = ecSelPageBottom
106 ShortCut = 24610
107 end
108 item
109 Command = ecPageUp
110 ShortCut = 33
111 end
112 item
113 Command = ecSelPageUp
114 ShortCut = 8225
115 end
116 item
117 Command = ecPageTop
118 ShortCut = 16417
119 end
120 item
121 Command = ecSelPageTop
122 ShortCut = 24609
123 end
124 item
125 Command = ecLineStart
126 ShortCut = 36
127 end
128 item
129 Command = ecSelLineStart
130 ShortCut = 8228
131 end
132 item
133 Command = ecEditorTop
134 ShortCut = 16420
135 end
136 item
137 Command = ecSelEditorTop
138 ShortCut = 24612
139 end
140 item
141 Command = ecLineEnd
142 ShortCut = 35
143 end
144 item
145 Command = ecSelLineEnd
146 ShortCut = 8227
147 end
148 item
149 Command = ecEditorBottom
150 ShortCut = 16419
151 end
152 item
153 Command = ecSelEditorBottom
154 ShortCut = 24611
155 end
156 item
157 Command = ecToggleMode
158 ShortCut = 45
159 end
160 item
161 Command = ecCopy
162 ShortCut = 16429
163 end
164 item
165 Command = ecPaste
166 ShortCut = 8237
167 end
168 item
169 Command = ecDeleteChar
170 ShortCut = 46
171 end
172 item
173 Command = ecCut
174 ShortCut = 8238
175 end
176 item
177 Command = ecDeleteLastChar
178 ShortCut = 8
179 end
180 item
181 Command = ecDeleteLastChar
182 ShortCut = 8200
183 end
184 item
185 Command = ecDeleteLastWord
186 ShortCut = 16392
187 end
188 item
189 Command = ecUndo
190 ShortCut = 32776
191 end
192 item
193 Command = ecRedo
194 ShortCut = 40968
195 end
196 item
197 Command = ecLineBreak
198 ShortCut = 13
199 end
200 item
201 Command = ecSelectAll
202 ShortCut = 16449
203 end
204 item
205 Command = ecCopy
206 ShortCut = 16451
207 end
208 item
209 Command = ecBlockIndent
210 ShortCut = 24649
211 end
212 item
213 Command = ecLineBreak
214 ShortCut = 16461
215 end
216 item
217 Command = ecInsertLine
218 ShortCut = 16462
219 end
220 item
221 Command = ecDeleteWord
222 ShortCut = 16468
223 end
224 item
225 Command = ecBlockUnindent
226 ShortCut = 24661
227 end
228 item
229 Command = ecPaste
230 ShortCut = 16470
231 end
232 item
233 Command = ecCut
234 ShortCut = 16472
235 end
236 item
237 Command = ecDeleteLine
238 ShortCut = 16473
239 end
240 item
241 Command = ecDeleteEOL
242 ShortCut = 24665
243 end
244 item
245 Command = ecUndo
246 ShortCut = 16474
247 end
248 item
249 Command = ecRedo
250 ShortCut = 24666
251 end
252 item
253 Command = ecGotoMarker0
254 ShortCut = 16432
255 end
256 item
257 Command = ecGotoMarker1
258 ShortCut = 16433
259 end
260 item
261 Command = ecGotoMarker2
262 ShortCut = 16434
263 end
264 item
265 Command = ecGotoMarker3
266 ShortCut = 16435
267 end
268 item
269 Command = ecGotoMarker4
270 ShortCut = 16436
271 end
272 item
273 Command = ecGotoMarker5
274 ShortCut = 16437
275 end
276 item
277 Command = ecGotoMarker6
278 ShortCut = 16438
279 end
280 item
281 Command = ecGotoMarker7
282 ShortCut = 16439
283 end
284 item
285 Command = ecGotoMarker8
286 ShortCut = 16440
287 end
288 item
289 Command = ecGotoMarker9
290 ShortCut = 16441
291 end
292 item
293 Command = ecSetMarker0
294 ShortCut = 24624
295 end
296 item
297 Command = ecSetMarker1
298 ShortCut = 24625
299 end
300 item
301 Command = ecSetMarker2
302 ShortCut = 24626
303 end
304 item
305 Command = ecSetMarker3
306 ShortCut = 24627
307 end
308 item
309 Command = ecSetMarker4
310 ShortCut = 24628
311 end
312 item
313 Command = ecSetMarker5
314 ShortCut = 24629
315 end
316 item
317 Command = ecSetMarker6
318 ShortCut = 24630
319 end
320 item
321 Command = ecSetMarker7
322 ShortCut = 24631
323 end
324 item
325 Command = ecSetMarker8
326 ShortCut = 24632
327 end
328 item
329 Command = ecSetMarker9
330 ShortCut = 24633
331 end
332 item
333 Command = EcFoldLevel1
334 ShortCut = 41009
335 end
336 item
337 Command = EcFoldLevel2
338 ShortCut = 41010
339 end
340 item
341 Command = EcFoldLevel3
342 ShortCut = 41011
343 end
344 item
345 Command = EcFoldLevel4
346 ShortCut = 41012
347 end
348 item
349 Command = EcFoldLevel5
350 ShortCut = 41013
351 end
352 item
353 Command = EcFoldLevel6
354 ShortCut = 41014
355 end
356 item
357 Command = EcFoldLevel7
358 ShortCut = 41015
359 end
360 item
361 Command = EcFoldLevel8
362 ShortCut = 41016
363 end
364 item
365 Command = EcFoldLevel9
366 ShortCut = 41017
367 end
368 item
369 Command = EcFoldLevel0
370 ShortCut = 41008
371 end
372 item
373 Command = EcFoldCurrent
374 ShortCut = 41005
375 end
376 item
377 Command = EcUnFoldCurrent
378 ShortCut = 41003
379 end
380 item
381 Command = EcToggleMarkupWord
382 ShortCut = 32845
383 end
384 item
385 Command = ecNormalSelect
386 ShortCut = 24654
387 end
388 item
389 Command = ecColumnSelect
390 ShortCut = 24643
391 end
392 item
393 Command = ecLineSelect
394 ShortCut = 24652
395 end
396 item
397 Command = ecTab
398 ShortCut = 9
399 end
400 item
401 Command = ecShiftTab
402 ShortCut = 8201
403 end
404 item
405 Command = ecMatchBracket
406 ShortCut = 24642
407 end
408 item
409 Command = ecColSelUp
410 ShortCut = 40998
411 end
412 item
413 Command = ecColSelDown
414 ShortCut = 41000
415 end
416 item
417 Command = ecColSelLeft
418 ShortCut = 40997
419 end
420 item
421 Command = ecColSelRight
422 ShortCut = 40999
423 end
424 item
425 Command = ecColSelPageDown
426 ShortCut = 40994
427 end
428 item
429 Command = ecColSelPageBottom
430 ShortCut = 57378
431 end
432 item
433 Command = ecColSelPageUp
434 ShortCut = 40993
435 end
436 item
437 Command = ecColSelPageTop
438 ShortCut = 57377
439 end
440 item
441 Command = ecColSelLineStart
442 ShortCut = 40996
443 end
444 item
445 Command = ecColSelLineEnd
446 ShortCut = 40995
447 end
448 item
449 Command = ecColSelEditorTop
450 ShortCut = 57380
451 end
452 item
453 Command = ecColSelEditorBottom
454 ShortCut = 57379
455 end>
456 MouseActions = <>
457 MouseTextActions = <>
458 MouseSelActions = <>
459 VisibleSpecialChars = [vscSpace, vscTabAtLast]
460 SelectedColor.BackPriority = 50
461 SelectedColor.ForePriority = 50
462 SelectedColor.FramePriority = 50
463 SelectedColor.BoldPriority = 50
464 SelectedColor.ItalicPriority = 50
465 SelectedColor.UnderlinePriority = 50
466 SelectedColor.StrikeOutPriority = 50
467 BracketHighlightStyle = sbhsBoth
468 BracketMatchColor.Background = clNone
469 BracketMatchColor.Foreground = clNone
470 BracketMatchColor.Style = [fsBold]
471 FoldedCodeColor.Background = clNone
472 FoldedCodeColor.Foreground = clGray
473 FoldedCodeColor.FrameColor = clGray
474 MouseLinkColor.Background = clNone
475 MouseLinkColor.Foreground = clBlue
476 LineHighlightColor.Background = clNone
477 LineHighlightColor.Foreground = clNone
478 OnChange = MemoSourceChange
479 inline SynLeftGutterPartList1: TSynGutterPartList
480 object SynGutterMarks1: TSynGutterMarks
481 Width = 36
482 MouseActions = <>
483 end
484 object SynGutterLineNumber1: TSynGutterLineNumber
485 Width = 21
486 MouseActions = <>
487 MarkupInfo.Background = clBtnFace
488 MarkupInfo.Foreground = clNone
489 DigitCount = 2
490 ShowOnlyLineNumbersMultiplesOf = 1
491 ZeroStart = False
492 LeadingZeros = False
493 end
494 object SynGutterChanges1: TSynGutterChanges
495 Width = 6
496 MouseActions = <>
497 ModifiedColor = 59900
498 SavedColor = clGreen
499 end
500 object SynGutterSeparator1: TSynGutterSeparator
501 Width = 3
502 MouseActions = <>
503 MarkupInfo.Background = clWhite
504 MarkupInfo.Foreground = clGray
505 end
506 object SynGutterCodeFolding1: TSynGutterCodeFolding
507 AutoSize = False
508 Width = 14
509 MouseActions = <>
510 MarkupInfo.Background = clNone
511 MarkupInfo.Foreground = clGray
512 MouseActionsExpanded = <>
513 MouseActionsCollapsed = <>
514 end
515 end
516 end
517 object PopupMenuSource: TPopupMenu
518 Images = Core.ImageListMain
519 Left = 154
520 Top = 154
521 object MenuItem23: TMenuItem
522 Action = FormMain.ABreakpointToggle
523 end
524 object MenuItem29: TMenuItem
525 Action = FormMain.AShowTargetPosition
526 Bitmap.Data = {
527 36040000424D3604000000000000360000002800000010000000100000000100
528 2000000000000004000064000000640000000000000000000000FFFFFF00FFFF
529 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
530 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
531 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
532 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
533 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
534 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
535 FF000000008B000000B7FFFFFF000000008B000000FF000000FF000000FF0000
536 008BFFFFFF00000000B7000000FF000000B7FFFFFF00FFFFFF00FFFFFF00FFFF
537 FF000000008B000000B7FFFFFF0000000063000000FF00000063FFFFFF00FFFF
538 FF0000000063000000B700000020000000FF00000063FFFFFF00FFFFFF00FFFF
539 FF000000008B000000B7FFFFFF00FFFFFF00000000FF000000FF00000020FFFF
540 FF00FFFFFF00FFFFFF00FFFFFF00000000FF0000008BFFFFFF00FFFFFF00FFFF
541 FF000000008B000000B7FFFFFF00FFFFFF0000000040000000FF000000B7FFFF
542 FF00FFFFFF00FFFFFF00FFFFFF00000000FF00000063FFFFFF00FFFFFF00FFFF
543 FF000000008B000000B7FFFFFF00FFFFFF00FFFFFF000000008B000000FF0000
544 0040FFFFFF00FFFFFF00000000FF00000040FFFFFF00FFFFFF00000000200000
545 00B70000008B000000B7FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF0000
546 008BFFFFFF00FFFFFF0000000020000000FF00000020FFFFFF00000000200000
547 00FF000000FF000000B7FFFFFF00FFFFFF00FFFFFF00FFFFFF000000008B0000
548 008BFFFFFF00FFFFFF00FFFFFF00000000FF00000040FFFFFF00FFFFFF000000
549 0040000000FF000000B7FFFFFF0000000063000000B7FFFFFF00000000B70000
550 0063000000630000008B00000020000000FF00000020FFFFFF00FFFFFF00FFFF
551 FF0000000063000000B7FFFFFF00FFFFFF00000000FF000000FF000000B7FFFF
552 FF00FFFFFF00000000FF000000FF0000008BFFFFFF00FFFFFF00FFFFFF00FFFF
553 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
554 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
555 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
556 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
557 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
558 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
559 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
560 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
561 }
562 end
563 object Separator1: TMenuItem
564 Caption = '-'
565 end
566 object MenuItem26: TMenuItem
567 Action = AFormatSource
568 end
569 object MenuItem36: TMenuItem
570 Action = AShrinkSource
571 end
572 object MenuItem21: TMenuItem
573 Action = AGenerateNumber
574 end
575 object MenuItem7: TMenuItem
576 Action = AGenerateText
577 end
578 object MenuItem1: TMenuItem
579 Caption = '-'
580 end
581 object MenuItem2: TMenuItem
582 Action = ACopyToClipboard
583 end
584 object MenuItem3: TMenuItem
585 Action = APasteFromClipboard
586 end
587 object MenuItem6: TMenuItem
588 Action = ACutToClipboard
589 end
590 object MenuItem4: TMenuItem
591 Action = AClear
592 end
593 object MenuItem5: TMenuItem
594 Action = ASelectAll
595 end
596 end
597 object ActionList1: TActionList
598 Images = Core.ImageListMain
599 Left = 152
600 Top = 67
601 object AGenerateNumber: TAction
602 Caption = 'Generate number'
603 ImageIndex = 13
604 OnExecute = AGenerateNumberExecute
605 end
606 object AShrinkSource: TAction
607 Caption = 'Shrink source'
608 Hint = 'Shrink source'
609 OnExecute = AShrinkSourceExecute
610 end
611 object AFormatSource: TAction
612 Caption = 'Format source'
613 Hint = 'Format source'
614 OnExecute = AFormatSourceExecute
615 end
616 object APasteFromClipboard: TAction
617 Caption = 'Paste'
618 Hint = 'Paste'
619 ImageIndex = 18
620 OnExecute = APasteFromClipboardExecute
621 ShortCut = 16470
622 end
623 object ACopyToClipboard: TAction
624 Caption = 'Copy'
625 Hint = 'Copy'
626 ImageIndex = 19
627 OnExecute = ACopyToClipboardExecute
628 ShortCut = 16451
629 end
630 object AClear: TAction
631 Caption = 'Clear'
632 Hint = 'Clear'
633 ImageIndex = 4
634 OnExecute = AClearExecute
635 end
636 object ASelectAll: TAction
637 Caption = 'Select all'
638 Hint = 'Select all'
639 OnExecute = ASelectAllExecute
640 ShortCut = 16449
641 end
642 object ACutToClipboard: TAction
643 Caption = 'Cut'
644 Hint = 'Cut'
645 ImageIndex = 20
646 OnExecute = ACutToClipboardExecute
647 ShortCut = 16472
648 end
649 object AGenerateText: TAction
650 Caption = 'Generate text'
651 ImageIndex = 29
652 OnExecute = AGenerateTextExecute
653 end
654 end
655 object SynJavaSyn1: TSynJavaSyn
656 DefaultFilter = 'Soubory Java (*.java)|*.java'
657 Enabled = False
658 Left = 486
659 Top = 316
660 end
661end
Note: See TracBrowser for help on using the repository browser.