lazarus/components/lazreport/source/lr_edit.lfm
2009-07-12 06:48:22 +00:00

845 lines
18 KiB
Plaintext

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