added help button, fixed achoring InsertMacroButton

git-svn-id: trunk@16961 -
This commit is contained in:
darius 2008-10-11 21:33:32 +00:00
parent 46283869bd
commit d91d1ae561
3 changed files with 695 additions and 130 deletions

View File

@ -3,36 +3,108 @@ object CodeTemplateDialog: TCodeTemplateDialog
Height = 542
Top = 122
Width = 497
HelpContext = 0
ActiveControl = FilenameEdit
Align = alNone
AllowDropFiles = False
AutoScroll = True
AutoSize = False
BorderIcons = [biSystemMenu]
BorderStyle = bsSizeable
Caption = 'CodeTemplateDialog'
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 542
ClientWidth = 497
DockSite = False
DragKind = dkDrag
DragMode = dmManual
Enabled = True
Font.Height = 0
Font.Style = []
FormStyle = fsNormal
OnClose = FormClose
OnCreate = FormCreate
ParentBiDiMode = True
ParentFont = False
LCLVersion = '0.9.25'
Position = poDesigned
ShowInTaskBar = stDefault
UseDockManager = False
LCLVersion = '0.9.27'
WindowState = wsNormal
object FilenameGroupBox: TGroupBox
Left = 6
Height = 51
Top = 6
Width = 485
HelpContext = 0
Align = alTop
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'FilenameGroupBox'
ClientHeight = 33
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 32
ClientWidth = 481
Ctl3D = False
DockSite = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ParentColor = True
ParentCtl3D = True
ParentFont = True
ParentShowHint = True
TabOrder = 0
TabStop = False
Visible = True
object FilenameEdit: TEdit
AnchorSideRight.Control = FilenameButton
Left = 9
Height = 23
Top = 4
Width = 435
HelpContext = 0
Align = alNone
Anchors = [akTop, akLeft, akRight]
AutoSize = False
AutoSelect = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 5
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
CharCase = ecNormal
DragCursor = crDrag
DragMode = dmManual
EchoMode = emNormal
Enabled = True
MaxLength = -1
ParentBidiMode = True
ParentFont = True
ParentShowHint = True
PasswordChar = #0
ReadOnly = False
TabStop = True
TabOrder = 0
Text = 'FilenameEdit'
Visible = True
end
object FilenameButton: TButton
AnchorSideRight.Control = FilenameGroupBox
@ -43,11 +115,31 @@ object CodeTemplateDialog: TCodeTemplateDialog
Height = 23
Top = 4
Width = 26
HelpContext = 0
Align = alNone
Anchors = [akRight, akBottom]
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 6
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = False
Caption = '...'
Default = False
DragCursor = crDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ModalResult = 0
OnClick = FilenameButtonClick
ParentFont = True
ParentShowHint = True
TabOrder = 1
TabStop = True
Visible = True
end
end
object TemplatesGroupBox: TGroupBox
@ -56,12 +148,38 @@ object CodeTemplateDialog: TCodeTemplateDialog
Height = 167
Top = 63
Width = 485
HelpContext = 0
Align = alTop
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'TemplatesGroupBox'
ClientHeight = 149
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 148
ClientWidth = 481
Ctl3D = False
DockSite = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ParentColor = True
ParentCtl3D = True
ParentFont = True
ParentShowHint = True
TabOrder = 1
TabStop = False
Visible = True
object TemplateListBox: TListBox
AnchorSideLeft.Control = TemplatesGroupBox
AnchorSideTop.Control = TemplatesGroupBox
@ -69,16 +187,40 @@ object CodeTemplateDialog: TCodeTemplateDialog
AnchorSideBottom.Control = TemplatesGroupBox
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 137
Height = 136
Top = 6
Width = 315
HelpContext = 0
Align = alNone
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
BorderStyle = bsSingle
ClickOnSelChange = True
Columns = 0
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
ExtendedSelect = True
Enabled = True
IntegralHeight = False
ItemHeight = 0
MultiSelect = False
OnSelectionChange = TemplateListBoxSelectionChange
ParentBidiMode = True
ParentShowHint = True
ParentFont = True
Sorted = False
Style = lbStandard
TabOrder = 0
TabStop = True
TopIndex = -1
Visible = True
end
object AddButton: TButton
AnchorSideTop.Control = TemplateListBox
@ -88,11 +230,31 @@ object CodeTemplateDialog: TCodeTemplateDialog
Height = 30
Top = 6
Width = 148
HelpContext = 0
Align = alNone
Anchors = [akTop, akRight]
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 6
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = False
Caption = 'AddButton'
Default = False
DragCursor = crDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ModalResult = 0
OnClick = AddButtonClick
ParentFont = True
ParentShowHint = True
TabOrder = 1
TabStop = True
Visible = True
end
object DeleteButton: TButton
AnchorSideLeft.Control = AddButton
@ -104,11 +266,31 @@ object CodeTemplateDialog: TCodeTemplateDialog
Height = 30
Top = 42
Width = 148
HelpContext = 0
Align = alNone
Anchors = [akTop, akLeft, akRight]
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 6
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = False
Caption = 'DeleteButton'
Default = False
DragCursor = crDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ModalResult = 0
OnClick = DeleteButtonClick
ParentFont = True
ParentShowHint = True
TabOrder = 3
TabStop = True
Visible = True
end
object EditButton: TButton
AnchorSideLeft.Control = AddButton
@ -120,11 +302,31 @@ object CodeTemplateDialog: TCodeTemplateDialog
Height = 30
Top = 78
Width = 148
HelpContext = 0
Align = alNone
Anchors = [akTop, akLeft, akRight]
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 6
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = False
Caption = 'EditButton'
Default = False
DragCursor = crDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ModalResult = 0
OnClick = EditButtonClick
ParentFont = True
ParentShowHint = True
TabOrder = 2
TabStop = True
Visible = True
end
end
object EditTemplateGroupBox: TGroupBox
@ -134,23 +336,73 @@ object CodeTemplateDialog: TCodeTemplateDialog
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = BtnPanel
Left = 6
Height = 265
Height = 250
Top = 236
Width = 485
HelpContext = 0
Align = alNone
Anchors = [akTop, akLeft, akRight, akBottom]
AutoSize = False
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'EditTemplateGroupBox'
ClientHeight = 247
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 231
ClientWidth = 481
Ctl3D = False
DockSite = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ParentColor = True
ParentCtl3D = True
ParentFont = True
ParentShowHint = True
TabOrder = 2
TabStop = False
Visible = True
object UseMacrosCheckBox: TCheckBox
Left = 6
Height = 19
Height = 22
Top = 6
Width = 125
Width = 158
HelpContext = 0
Align = alNone
AllowGrayed = False
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 7
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'UseMacrosCheckBox'
Checked = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
ParentColor = True
ParentFont = True
ParentShowHint = True
ParentBidiMode = True
State = cbUnchecked
TabOrder = 0
TabStop = True
UseOnChange = False
Visible = True
end
object InsertMacroButton: TButton
AnchorSideLeft.Control = UseMacrosCheckBox
@ -158,18 +410,37 @@ object CodeTemplateDialog: TCodeTemplateDialog
AnchorSideTop.Control = UseMacrosCheckBox
AnchorSideTop.Side = asrCenter
AnchorSideRight.Side = asrBottom
Left = 131
Height = 23
Top = 4
Width = 116
Left = 190
Height = 29
Top = 3
Width = 130
HelpContext = 0
Align = alNone
AutoSize = True
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Left = 20
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = False
Caption = 'InsertMacroButton'
Default = False
DragCursor = crDrag
DragMode = dmManual
Enabled = True
ParentBidiMode = True
ModalResult = 0
OnClick = InsertMacroButtonClick
ParentFont = True
ParentShowHint = True
TabOrder = 2
TabStop = True
Visible = True
end
object TemplateSynEdit: TSynEdit
Tag = 0
AnchorSideTop.Control = AutoOnOptionsCheckGroup
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = EditTemplateGroupBox
@ -177,18 +448,42 @@ object CodeTemplateDialog: TCodeTemplateDialog
AnchorSideBottom.Control = EditTemplateGroupBox
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 172
Top = 69
Height = 151
Top = 74
Width = 469
HelpContext = 0
Align = alNone
BlockIndent = 2
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Anchors = [akTop, akLeft, akRight, akBottom]
Color = clWhite
CFDividerDrawLevel = 0
Ctl3D = False
Enabled = True
Font.Height = -14
Font.Name = 'courier'
Font.Pitch = fpFixed
Font.Quality = fqNonAntialiased
Font.Style = []
ParentColor = False
ParentCtl3D = True
ParentFont = False
ParentShowHint = True
TabOrder = 1
Visible = True
BookMarkOptions.OnChange = nil
BorderStyle = bsSingle
ExtraCharSpacing = 0
ExtraLineSpacing = 0
HideSelection = False
InsertCaret = ctVerticalLine
InsertMode = True
Keystrokes = <
item
Command = 3
@ -513,6 +808,18 @@ object CodeTemplateDialog: TCodeTemplateDialog
Lines.Strings = (
'TemplateSynEdit'
)
MaxLeftChar = 1024
MaxUndo = 1024
Options = [eoAutoIndent, eoDragDropEditing, eoGroupUndo, eoScrollPastEol, eoShowScrollHint, eoSmartTabDelete, eoSmartTabs, eoTabsToSpaces, eoTrimTrailingSpaces, eoBracketHighlight]
Options2 = []
OverwriteCaret = ctBlock
ReadOnly = False
RightEdge = 80
RightEdgeColor = clSilver
ScrollBars = ssBoth
SelectionMode = smNormal
TabWidth = 8
WantTabs = False
end
object AutoOnOptionsCheckGroup: TCheckGroup
AnchorSideLeft.Control = EditTemplateGroupBox
@ -522,75 +829,188 @@ object CodeTemplateDialog: TCodeTemplateDialog
AnchorSideRight.Side = asrBottom
Left = 6
Height = 30
Top = 33
Top = 38
Width = 469
HelpContext = 0
Align = alNone
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Caption = 'AutoOnOptionsCheckGroup'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 2
ColumnLayout = clHorizontalThenVertical
Columns = 2
Constraints.MinHeight = 30
Ctl3D = False
Enabled = True
ParentFont = True
ParentColor = True
ParentCtl3D = True
ParentShowHint = True
TabOrder = 3
Visible = True
end
end
object BtnPanel: TPanel
Height = 35
Top = 507
Left = 0
Height = 50
Top = 492
Width = 497
HelpContext = 0
Align = alBottom
Alignment = taCenter
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 0
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
BevelInner = bvNone
BevelOuter = bvNone
ClientHeight = 35
ClientWidth = 497
BevelWidth = 1
BorderWidth = 0
BorderStyle = bsNone
ChildSizing.LeftRightSpacing = 0
ChildSizing.TopBottomSpacing = 0
ChildSizing.HorizontalSpacing = 0
ChildSizing.VerticalSpacing = 0
ChildSizing.ControlsPerLine = 0
ClientHeight = 46
ClientWidth = 493
DockSite = False
DragCursor = crDrag
DragKind = dkDrag
DragMode = dmManual
Enabled = True
FullRepaint = True
ParentColor = True
ParentFont = True
ParentShowHint = True
TabOrder = 3
TabStop = False
Visible = True
object OkButton: TBitBtn
AnchorSideBottom.Side = asrBottom
Left = 335
Height = 23
Left = 326
Height = 34
Top = 6
Width = 75
HelpContext = 0
Align = alRight
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = False
Caption = '&OK'
Constraints.MinWidth = 75
Default = True
Enabled = True
Kind = bkOK
Layout = blGlyphLeft
Margin = -1
ModalResult = 1
NumGlyphs = 0
OnClick = OkButtonClick
ParentFont = True
ParentShowHint = True
Spacing = 3
TabOrder = 0
TabStop = True
Visible = True
end
object CancelButton: TBitBtn
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 416
Height = 23
Left = 407
Height = 34
Top = 6
Width = 75
Width = 80
HelpContext = 0
Align = alRight
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = True
Caption = 'Cancel'
Constraints.MinWidth = 75
Default = False
Enabled = True
Kind = bkCancel
Layout = blGlyphLeft
Margin = -1
ModalResult = 2
NumGlyphs = 0
ParentFont = True
ParentShowHint = True
Spacing = 3
TabOrder = 1
TabStop = True
Visible = True
end
object HelpButton: TBitBtn
Left = 6
Height = 34
Top = 6
Width = 66
HelpContext = 0
Align = alLeft
AutoSize = True
BorderSpacing.Left = 0
BorderSpacing.Top = 0
BorderSpacing.Right = 0
BorderSpacing.Bottom = 0
BorderSpacing.Around = 6
BorderSpacing.CellAlignHorizontal = ccaFill
BorderSpacing.CellAlignVertical = ccaFill
Cancel = False
Caption = '&Help'
Default = False
Enabled = True
Kind = bkHelp
Layout = blGlyphLeft
Margin = -1
ModalResult = 0
NumGlyphs = 0
OnClick = HelpButtonClick
ParentFont = True
ParentShowHint = True
Spacing = 3
TabOrder = 2
TabStop = True
Visible = True
end
end
object ASynPasSyn: TSynFreePascalSyn
Enabled = False
CompilerMode = pcmObjFPC
NestedComments = True
left = 304
top = 344

View File

@ -2,82 +2,176 @@
LazarusResources.Add('TCodeTemplateDialog','FORMDATA',[
'TPF0'#19'TCodeTemplateDialog'#18'CodeTemplateDialog'#4'Left'#3#29#1#6'Height'
+#3#30#2#3'Top'#2'z'#5'Width'#3#241#1#13'ActiveControl'#7#12'FilenameEdit'#11
+'BorderIcons'#11#12'biSystemMenu'#0#7'Caption'#6#18'CodeTemplateDialog'#12'C'
+'lientHeight'#3#30#2#11'ClientWidth'#3#241#1#7'OnClose'#7#9'FormClose'#8'OnC'
+'reate'#7#10'FormCreate'#10'ParentFont'#8#10'LCLVersion'#6#6'0.9.25'#0#9'TGr'
+'oupBox'#16'FilenameGroupBox'#4'Left'#2#6#6'Height'#2'3'#3'Top'#2#6#5'Width'
+#3#229#1#5'Align'#7#5'alTop'#20'BorderSpacing.Around'#2#6#7'Caption'#6#16'Fi'
+'lenameGroupBox'#12'ClientHeight'#2'!'#11'ClientWidth'#3#225#1#8'TabOrder'#2
+#0#0#5'TEdit'#12'FilenameEdit'#23'AnchorSideRight.Control'#7#14'FilenameButt'
+'on'#4'Left'#2#9#6'Height'#2#23#3'Top'#2#4#5'Width'#3#179#1#7'Anchors'#11#5
+'akTop'#6'akLeft'#7'akRight'#0#19'BorderSpacing.Right'#2#5#8'TabOrder'#2#0#4
+'Text'#6#12'FilenameEdit'#0#0#7'TButton'#14'FilenameButton'#23'AnchorSideRig'
+'ht.Control'#7#16'FilenameGroupBox'#20'AnchorSideRight.Side'#7#9'asrBottom'
+#24'AnchorSideBottom.Control'#7#12'FilenameEdit'#21'AnchorSideBottom.Side'#7
+#9'asrBottom'#4'Left'#3#193#1#6'Height'#2#23#3'Top'#2#4#5'Width'#2#26#7'Anch'
+'ors'#11#7'akRight'#8'akBottom'#0#19'BorderSpacing.Right'#2#6#7'Caption'#6#3
+'...'#7'OnClick'#7#19'FilenameButtonClick'#8'TabOrder'#2#1#0#0#0#9'TGroupBox'
+#17'TemplatesGroupBox'#24'AnchorSideBottom.Control'#7#12'CancelButton'#4'Lef'
+'t'#2#6#6'Height'#3#167#0#3'Top'#2'?'#5'Width'#3#229#1#5'Align'#7#5'alTop'#20
+'BorderSpacing.Around'#2#6#7'Caption'#6#17'TemplatesGroupBox'#12'ClientHeigh'
+'t'#3#149#0#11'ClientWidth'#3#225#1#8'TabOrder'#2#1#0#8'TListBox'#15'Templat'
+'eListBox'#22'AnchorSideLeft.Control'#7#17'TemplatesGroupBox'#21'AnchorSideT'
+'op.Control'#7#17'TemplatesGroupBox'#23'AnchorSideRight.Control'#7#9'AddButt'
+'on'#24'AnchorSideBottom.Control'#7#17'TemplatesGroupBox'#21'AnchorSideBotto'
+'m.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#137#0#3'Top'#2#6#5'Width'#3
+';'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'BorderSpa'
+'cing.Left'#2#6#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Right'#2#6#20'Bor'
+'derSpacing.Bottom'#2#6#17'OnSelectionChange'#7#30'TemplateListBoxSelectionC'
+'hange'#8'TabOrder'#2#0#0#0#7'TButton'#9'AddButton'#21'AnchorSideTop.Control'
+#7#15'TemplateListBox'#23'AnchorSideRight.Control'#7#17'TemplatesGroupBox'#20
+'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3'G'#1#6'Height'#2#30#3'Top'#2
+#6#5'Width'#3#148#0#7'Anchors'#11#5'akTop'#7'akRight'#0#19'BorderSpacing.Rig'
+'ht'#2#6#7'Caption'#6#9'AddButton'#7'OnClick'#7#14'AddButtonClick'#8'TabOrde'
+'r'#2#1#0#0#7'TButton'#12'DeleteButton'#22'AnchorSideLeft.Control'#7#9'AddBu'
+'tton'#21'AnchorSideTop.Control'#7#9'AddButton'#18'AnchorSideTop.Side'#7#9'a'
+'srBottom'#23'AnchorSideRight.Control'#7#9'AddButton'#20'AnchorSideRight.Sid'
+'e'#7#9'asrBottom'#4'Left'#3'G'#1#6'Height'#2#30#3'Top'#2'*'#5'Width'#3#148#0
+#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2#6#7'C'
+'aption'#6#12'DeleteButton'#7'OnClick'#7#17'DeleteButtonClick'#8'TabOrder'#2
+#3#0#0#7'TButton'#10'EditButton'#22'AnchorSideLeft.Control'#7#9'AddButton'#21
+'AnchorSideTop.Control'#7#12'DeleteButton'#18'AnchorSideTop.Side'#7#9'asrBot'
+'tom'#23'AnchorSideRight.Control'#7#12'DeleteButton'#20'AnchorSideRight.Side'
+#7#9'asrBottom'#4'Left'#3'G'#1#6'Height'#2#30#3'Top'#2'N'#5'Width'#3#148#0#7
+'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#17'BorderSpacing.Top'#2#6#7'Cap'
+'tion'#6#10'EditButton'#7'OnClick'#7#15'EditButtonClick'#8'TabOrder'#2#2#0#0
+#0#9'TGroupBox'#20'EditTemplateGroupBox'#21'AnchorSideTop.Control'#7#17'Temp'
+'latesGroupBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Con'
+'trol'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBotto'
+'m.Control'#7#8'BtnPanel'#4'Left'#2#6#6'Height'#3#9#1#3'Top'#3#236#0#5'Width'
+#3#229#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#20'Border'
+'Spacing.Around'#2#6#7'Caption'#6#20'EditTemplateGroupBox'#12'ClientHeight'#3
+#247#0#11'ClientWidth'#3#225#1#8'TabOrder'#2#2#0#9'TCheckBox'#17'UseMacrosCh'
+'eckBox'#4'Left'#2#6#6'Height'#2#19#3'Top'#2#6#5'Width'#2'}'#20'BorderSpacin'
+'g.Bottom'#2#7#7'Caption'#6#17'UseMacrosCheckBox'#8'TabOrder'#2#0#0#0#7'TBut'
+'ton'#17'InsertMacroButton'#22'AnchorSideLeft.Control'#7#17'UseMacrosCheckBo'
+'x'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#17'Us'
+'eMacrosCheckBox'#18'AnchorSideTop.Side'#7#9'asrCenter'#20'AnchorSideRight.S'
+'ide'#7#9'asrBottom'#4'Left'#3#131#0#6'Height'#2#23#3'Top'#2#4#5'Width'#2't'
+#8'AutoSize'#9#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Right'#2#6#7'Capti'
+'on'#6#17'InsertMacroButton'#7'OnClick'#7#22'InsertMacroButtonClick'#8'TabOr'
+'der'#2#2#0#0#8'TSynEdit'#15'TemplateSynEdit'#21'AnchorSideTop.Control'#7#23
+'AutoOnOptionsCheckGroup'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSid'
+'eRight.Control'#7#20'EditTemplateGroupBox'#20'AnchorSideRight.Side'#7#9'asr'
+'Bottom'#24'AnchorSideBottom.Control'#7#20'EditTemplateGroupBox'#21'AnchorSi'
,'deBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#172#0#3'Top'#2'E'#5'W'
+'idth'#3#213#1#20'BorderSpacing.Around'#2#6#7'Anchors'#11#5'akTop'#6'akLeft'
+#7'akRight'#8'akBottom'#0#11'Font.Height'#2#242#9'Font.Name'#6#7'courier'#10
+'Font.Pitch'#7#7'fpFixed'#11'ParentColor'#8#10'ParentFont'#8#8'TabOrder'#2#1
+#24'BookMarkOptions.OnChange'#13#10'Keystrokes'#14#1#7'Command'#2#3#8'ShortC'
+'ut'#2'&'#0#1#7'Command'#2'g'#8'ShortCut'#3'& '#0#1#7'Command'#3#211#0#8'Sho'
+'rtCut'#3'&@'#0#1#7'Command'#2#4#8'ShortCut'#2'('#0#1#7'Command'#2'h'#8'Shor'
+'tCut'#3'( '#0#1#7'Command'#3#212#0#8'ShortCut'#3'(@'#0#1#7'Command'#2#1#8'S'
+'hortCut'#2'%'#0#1#7'Command'#2'e'#8'ShortCut'#3'% '#0#1#7'Command'#2#5#8'Sh'
+'ortCut'#3'%@'#0#1#7'Command'#2'i'#8'ShortCut'#3'%`'#0#1#7'Command'#2#2#8'Sh'
+'ortCut'#2''''#0#1#7'Command'#2'f'#8'ShortCut'#3''' '#0#1#7'Command'#2#6#8'S'
+'hortCut'#3'''@'#0#1#7'Command'#2'j'#8'ShortCut'#3'''`'#0#1#7'Command'#2#10#8
+'ShortCut'#2'"'#0#1#7'Command'#2'n'#8'ShortCut'#3'" '#0#1#7'Command'#2#14#8
+#3#30#2#3'Top'#2'z'#5'Width'#3#241#1#11'HelpContext'#2#0#13'ActiveControl'#7
+#12'FilenameEdit'#5'Align'#7#6'alNone'#14'AllowDropFiles'#8#10'AutoScroll'#9
+#8'AutoSize'#8#11'BorderIcons'#11#12'biSystemMenu'#0#11'BorderStyle'#7#10'bs'
+'Sizeable'#7'Caption'#6#18'CodeTemplateDialog'#28'ChildSizing.LeftRightSpaci'
+'ng'#2#0#28'ChildSizing.TopBottomSpacing'#2#0#29'ChildSizing.HorizontalSpaci'
+'ng'#2#0#27'ChildSizing.VerticalSpacing'#2#0#27'ChildSizing.ControlsPerLine'
+#2#0#12'ClientHeight'#3#30#2#11'ClientWidth'#3#241#1#8'DockSite'#8#8'DragKin'
+'d'#7#6'dkDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#11'Font.Height'#2#0#10
+'Font.Style'#11#0#9'FormStyle'#7#8'fsNormal'#7'OnClose'#7#9'FormClose'#8'OnC'
+'reate'#7#10'FormCreate'#14'ParentBiDiMode'#9#10'ParentFont'#8#8'Position'#7
+#10'poDesigned'#13'ShowInTaskBar'#7#9'stDefault'#14'UseDockManager'#8#10'LCL'
+'Version'#6#6'0.9.27'#11'WindowState'#7#8'wsNormal'#0#9'TGroupBox'#16'Filena'
+'meGroupBox'#4'Left'#2#6#6'Height'#2'3'#3'Top'#2#6#5'Width'#3#229#1#11'HelpC'
+'ontext'#2#0#5'Align'#7#5'alTop'#8'AutoSize'#8#18'BorderSpacing.Left'#2#0#17
+'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'
+#2#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'cc'
+'aFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#16'Fil'
+'enameGroupBox'#28'ChildSizing.LeftRightSpacing'#2#0#28'ChildSizing.TopBotto'
+'mSpacing'#2#0#29'ChildSizing.HorizontalSpacing'#2#0#27'ChildSizing.Vertical'
+'Spacing'#2#0#27'ChildSizing.ControlsPerLine'#2#0#12'ClientHeight'#2' '#11'C'
+'lientWidth'#3#225#1#5'Ctl3D'#8#8'DockSite'#8#10'DragCursor'#7#6'crDrag'#8'D'
+'ragKind'#7#6'dkDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#14'ParentBidiMo'
+'de'#9#11'ParentColor'#9#11'ParentCtl3D'#9#10'ParentFont'#9#14'ParentShowHin'
+'t'#9#8'TabOrder'#2#0#7'TabStop'#8#7'Visible'#9#0#5'TEdit'#12'FilenameEdit'
+#23'AnchorSideRight.Control'#7#14'FilenameButton'#4'Left'#2#9#6'Height'#2#23
+#3'Top'#2#4#5'Width'#3#179#1#11'HelpContext'#2#0#5'Align'#7#6'alNone'#7'Anch'
+'ors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#8#10'AutoSelect'#8#18'B'
+'orderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#5
+#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.Ce'
+'llAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'cca'
+'Fill'#8'CharCase'#7#8'ecNormal'#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8
+'dmManual'#8'EchoMode'#7#8'emNormal'#7'Enabled'#9#9'MaxLength'#2#255#14'Pare'
+'ntBidiMode'#9#10'ParentFont'#9#14'ParentShowHint'#9#12'PasswordChar'#6#1#0#8
+'ReadOnly'#8#7'TabStop'#9#8'TabOrder'#2#0#4'Text'#6#12'FilenameEdit'#7'Visib'
+'le'#9#0#0#7'TButton'#14'FilenameButton'#23'AnchorSideRight.Control'#7#16'Fi'
+'lenameGroupBox'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom'
+'.Control'#7#12'FilenameEdit'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Lef'
+'t'#3#193#1#6'Height'#2#23#3'Top'#2#4#5'Width'#2#26#11'HelpContext'#2#0#5'Al'
+'ign'#7#6'alNone'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#8#18'Bo'
+'rderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#6
+#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!BorderSpacing.Ce'
+'llAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'cca'
+'Fill'#6'Cancel'#8#7'Caption'#6#3'...'#7'Default'#8#10'DragCursor'#7#6'crDra'
+'g'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#14'ParentBidiMode'#9#11'ModalResu'
+'lt'#2#0#7'OnClick'#7#19'FilenameButtonClick'#10'ParentFont'#9#14'ParentShow'
+'Hint'#9#8'TabOrder'#2#1#7'TabStop'#9#7'Visible'#9#0#0#0#9'TGroupBox'#17'Tem'
+'platesGroupBox'#24'AnchorSideBottom.Control'#7#12'CancelButton'#4'Left'#2#6
+#6'Height'#3#167#0#3'Top'#2'?'#5'Width'#3#229#1#11'HelpContext'#2#0#5'Align'
+#7#5'alTop'#8'AutoSize'#8#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2
+#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing'
+'.Around'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpac'
+'ing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6#17'TemplatesGroupBox'#28'C'
+'hildSizing.LeftRightSpacing'#2#0#28'ChildSizing.TopBottomSpacing'#2#0#29'Ch'
+'ildSizing.HorizontalSpacing'#2#0#27'ChildSizing.VerticalSpacing'#2#0#27'Chi'
+'ldSizing.ControlsPerLine'#2#0#12'ClientHeight'#3#148#0#11'ClientWidth'#3#225
+#1#5'Ctl3D'#8#8'DockSite'#8#10'DragCursor'#7#6'crDrag'#8'DragKind'#7#6'dkDra'
+'g'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#14'ParentBidiMode'#9#11'ParentCol'
+'or'#9#11'ParentCtl3D'#9#10'ParentFont'#9#14'ParentShowHint'#9#8'TabOrder'#2
+#1#7'TabStop'#8#7'Visible'#9#0#8'TListBox'#15'TemplateListBox'#22'AnchorSide'
+'Left.Control'#7#17'TemplatesGroupBox'#21'AnchorSideTop.Control'#7#17'Templa'
+'tesGroupBox'#23'AnchorSideRight.Control'#7#9'AddButton'#24'AnchorSideBottom'
+'.Control'#7#17'TemplatesGroupBox'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
+'Left'#2#6#6'Height'#3#136#0#3'Top'#2#6#5'Width'#3';'#1#11'HelpContext'#2#0#5
,'Align'#7#6'alNone'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0
+#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#19'BorderSpacing.Right'
+#2#6#20'BorderSpacing.Bottom'#2#6#20'BorderSpacing.Around'#2#0'!BorderSpacin'
+'g.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7
+'ccaFill'#11'BorderStyle'#7#8'bsSingle'#16'ClickOnSelChange'#9#7'Columns'#2#0
+#10'DragCursor'#7#6'crDrag'#8'DragKind'#7#6'dkDrag'#8'DragMode'#7#8'dmManual'
+#14'ExtendedSelect'#9#7'Enabled'#9#14'IntegralHeight'#8#10'ItemHeight'#2#0#11
+'MultiSelect'#8#17'OnSelectionChange'#7#30'TemplateListBoxSelectionChange'#14
+'ParentBidiMode'#9#14'ParentShowHint'#9#10'ParentFont'#9#6'Sorted'#8#5'Style'
+#7#10'lbStandard'#8'TabOrder'#2#0#7'TabStop'#9#8'TopIndex'#2#255#7'Visible'#9
+#0#0#7'TButton'#9'AddButton'#21'AnchorSideTop.Control'#7#15'TemplateListBox'
+#23'AnchorSideRight.Control'#7#17'TemplatesGroupBox'#20'AnchorSideRight.Side'
+#7#9'asrBottom'#4'Left'#3'G'#1#6'Height'#2#30#3'Top'#2#6#5'Width'#3#148#0#11
+'HelpContext'#2#0#5'Align'#7#6'alNone'#7'Anchors'#11#5'akTop'#7'akRight'#0#8
+'AutoSize'#8#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderS'
+'pacing.Right'#2#6#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0
+'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlign'
+'Vertical'#7#7'ccaFill'#6'Cancel'#8#7'Caption'#6#9'AddButton'#7'Default'#8#10
+'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#14'ParentBid'
+'iMode'#9#11'ModalResult'#2#0#7'OnClick'#7#14'AddButtonClick'#10'ParentFont'
+#9#14'ParentShowHint'#9#8'TabOrder'#2#1#7'TabStop'#9#7'Visible'#9#0#0#7'TBut'
+'ton'#12'DeleteButton'#22'AnchorSideLeft.Control'#7#9'AddButton'#21'AnchorSi'
+'deTop.Control'#7#9'AddButton'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'Anch'
+'orSideRight.Control'#7#9'AddButton'#20'AnchorSideRight.Side'#7#9'asrBottom'
+#4'Left'#3'G'#1#6'Height'#2#30#3'Top'#2'*'#5'Width'#3#148#0#11'HelpContext'#2
+#0#5'Align'#7#6'alNone'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'Auto'
+'Size'#8#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#6#19'BorderSpaci'
+'ng.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#0'!Bo'
+'rderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVer'
+'tical'#7#7'ccaFill'#6'Cancel'#8#7'Caption'#6#12'DeleteButton'#7'Default'#8
+#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#14'Parent'
+'BidiMode'#9#11'ModalResult'#2#0#7'OnClick'#7#17'DeleteButtonClick'#10'Paren'
+'tFont'#9#14'ParentShowHint'#9#8'TabOrder'#2#3#7'TabStop'#9#7'Visible'#9#0#0
+#7'TButton'#10'EditButton'#22'AnchorSideLeft.Control'#7#9'AddButton'#21'Anch'
+'orSideTop.Control'#7#12'DeleteButton'#18'AnchorSideTop.Side'#7#9'asrBottom'
+#23'AnchorSideRight.Control'#7#12'DeleteButton'#20'AnchorSideRight.Side'#7#9
+'asrBottom'#4'Left'#3'G'#1#6'Height'#2#30#3'Top'#2'N'#5'Width'#3#148#0#11'He'
+'lpContext'#2#0#5'Align'#7#6'alNone'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRi'
+'ght'#0#8'AutoSize'#8#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#6#19
+'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Arou'
+'nd'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.C'
+'ellAlignVertical'#7#7'ccaFill'#6'Cancel'#8#7'Caption'#6#10'EditButton'#7'De'
+'fault'#8#10'DragCursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9
+#14'ParentBidiMode'#9#11'ModalResult'#2#0#7'OnClick'#7#15'EditButtonClick'#10
+'ParentFont'#9#14'ParentShowHint'#9#8'TabOrder'#2#2#7'TabStop'#9#7'Visible'#9
+#0#0#0#9'TGroupBox'#20'EditTemplateGroupBox'#21'AnchorSideTop.Control'#7#17
+'TemplatesGroupBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight'
+'.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideB'
+'ottom.Control'#7#8'BtnPanel'#4'Left'#2#6#6'Height'#3#250#0#3'Top'#3#236#0#5
+'Width'#3#229#1#11'HelpContext'#2#0#5'Align'#7#6'alNone'#7'Anchors'#11#5'akT'
+'op'#6'akLeft'#7'akRight'#8'akBottom'#0#8'AutoSize'#8#18'BorderSpacing.Left'
+#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.'
+'Bottom'#2#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.CellAlignHorizontal'
+#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#7'Caption'#6
+#20'EditTemplateGroupBox'#28'ChildSizing.LeftRightSpacing'#2#0#28'ChildSizin'
+'g.TopBottomSpacing'#2#0#29'ChildSizing.HorizontalSpacing'#2#0#27'ChildSizin'
+'g.VerticalSpacing'#2#0#27'ChildSizing.ControlsPerLine'#2#0#12'ClientHeight'
+#3#231#0#11'ClientWidth'#3#225#1#5'Ctl3D'#8#8'DockSite'#8#10'DragCursor'#7#6
+'crDrag'#8'DragKind'#7#6'dkDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#14'P'
+'arentBidiMode'#9#11'ParentColor'#9#11'ParentCtl3D'#9#10'ParentFont'#9#14'Pa'
+'rentShowHint'#9#8'TabOrder'#2#2#7'TabStop'#8#7'Visible'#9#0#9'TCheckBox'#17
+'UseMacrosCheckBox'#4'Left'#2#6#6'Height'#2#22#3'Top'#2#6#5'Width'#3#158#0#11
+'HelpContext'#2#0#5'Align'#7#6'alNone'#11'AllowGrayed'#8#8'AutoSize'#9#18'Bo'
+'rderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0
,#20'BorderSpacing.Bottom'#2#7#20'BorderSpacing.Around'#2#0'!BorderSpacing.Ce'
+'llAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'cca'
+'Fill'#7'Caption'#6#17'UseMacrosCheckBox'#7'Checked'#8#10'DragCursor'#7#6'cr'
+'Drag'#8'DragKind'#7#6'dkDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#11'Par'
+'entColor'#9#10'ParentFont'#9#14'ParentShowHint'#9#14'ParentBidiMode'#9#5'St'
+'ate'#7#11'cbUnchecked'#8'TabOrder'#2#0#7'TabStop'#9#11'UseOnChange'#8#7'Vis'
+'ible'#9#0#0#7'TButton'#17'InsertMacroButton'#22'AnchorSideLeft.Control'#7#17
+'UseMacrosCheckBox'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.'
+'Control'#7#17'UseMacrosCheckBox'#18'AnchorSideTop.Side'#7#9'asrCenter'#20'A'
+'nchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#190#0#6'Height'#2#29#3'Top'#2
+#3#5'Width'#3#130#0#11'HelpContext'#2#0#5'Align'#7#6'alNone'#8'AutoSize'#9#18
+'BorderSpacing.Left'#2#20#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2
+#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.'
+'CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'c'
+'caFill'#6'Cancel'#8#7'Caption'#6#17'InsertMacroButton'#7'Default'#8#10'Drag'
+'Cursor'#7#6'crDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#14'ParentBidiMod'
+'e'#9#11'ModalResult'#2#0#7'OnClick'#7#22'InsertMacroButtonClick'#10'ParentF'
+'ont'#9#14'ParentShowHint'#9#8'TabOrder'#2#2#7'TabStop'#9#7'Visible'#9#0#0#8
+'TSynEdit'#15'TemplateSynEdit'#3'Tag'#2#0#21'AnchorSideTop.Control'#7#23'Aut'
+'oOnOptionsCheckGroup'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRi'
+'ght.Control'#7#20'EditTemplateGroupBox'#20'AnchorSideRight.Side'#7#9'asrBot'
+'tom'#24'AnchorSideBottom.Control'#7#20'EditTemplateGroupBox'#21'AnchorSideB'
+'ottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#151#0#3'Top'#2'J'#5'Widt'
+'h'#3#213#1#11'HelpContext'#2#0#5'Align'#7#6'alNone'#11'BlockIndent'#2#2#18
+'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2
+#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.'
+'CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'c'
+'caFill'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#5'Color'#7
+#7'clWhite'#18'CFDividerDrawLevel'#2#0#5'Ctl3D'#8#7'Enabled'#9#11'Font.Heigh'
+'t'#2#242#9'Font.Name'#6#7'courier'#10'Font.Pitch'#7#7'fpFixed'#12'Font.Qual'
+'ity'#7#16'fqNonAntialiased'#10'Font.Style'#11#0#11'ParentColor'#8#11'Parent'
+'Ctl3D'#9#10'ParentFont'#8#14'ParentShowHint'#9#8'TabOrder'#2#1#7'Visible'#9
+#24'BookMarkOptions.OnChange'#13#11'BorderStyle'#7#8'bsSingle'#16'ExtraCharS'
+'pacing'#2#0#16'ExtraLineSpacing'#2#0#13'HideSelection'#8#11'InsertCaret'#7
+#14'ctVerticalLine'#10'InsertMode'#9#10'Keystrokes'#14#1#7'Command'#2#3#8'Sh'
+'ortCut'#2'&'#0#1#7'Command'#2'g'#8'ShortCut'#3'& '#0#1#7'Command'#3#211#0#8
+'ShortCut'#3'&@'#0#1#7'Command'#2#4#8'ShortCut'#2'('#0#1#7'Command'#2'h'#8'S'
+'hortCut'#3'( '#0#1#7'Command'#3#212#0#8'ShortCut'#3'(@'#0#1#7'Command'#2#1#8
+'ShortCut'#2'%'#0#1#7'Command'#2'e'#8'ShortCut'#3'% '#0#1#7'Command'#2#5#8'S'
+'hortCut'#3'%@'#0#1#7'Command'#2'i'#8'ShortCut'#3'%`'#0#1#7'Command'#2#2#8'S'
+'hortCut'#2''''#0#1#7'Command'#2'f'#8'ShortCut'#3''' '#0#1#7'Command'#2#6#8
+'ShortCut'#3'''@'#0#1#7'Command'#2'j'#8'ShortCut'#3'''`'#0#1#7'Command'#2#10
+#8'ShortCut'#2'"'#0#1#7'Command'#2'n'#8'ShortCut'#3'" '#0#1#7'Command'#2#14#8
+'ShortCut'#3'"@'#0#1#7'Command'#2'r'#8'ShortCut'#3'"`'#0#1#7'Command'#2#9#8
+'ShortCut'#2'!'#0#1#7'Command'#2'm'#8'ShortCut'#3'! '#0#1#7'Command'#2#13#8
+'ShortCut'#3'!@'#0#1#7'Command'#2'q'#8'ShortCut'#3'!`'#0#1#7'Command'#2#7#8
@ -99,7 +193,7 @@ LazarusResources.Add('TCodeTemplateDialog','FORMDATA',[
+'ut'#3'Y@'#0#1#7'Command'#3#250#1#8'ShortCut'#3'Y`'#0#1#7'Command'#3'Y'#2#8
+'ShortCut'#3'Z@'#0#1#7'Command'#3'Z'#2#8'ShortCut'#3'Z`'#0#1#7'Command'#3'-'
+#1#8'ShortCut'#3'0@'#0#1#7'Command'#3'.'#1#8'ShortCut'#3'1@'#0#1#7'Command'#3
+'/'#1#8'ShortCut'#3'2@'#0#1#7'Command'#3'0'#1#8'ShortCut'#3'3@'#0#1#7'Comman'
,'/'#1#8'ShortCut'#3'2@'#0#1#7'Command'#3'0'#1#8'ShortCut'#3'3@'#0#1#7'Comman'
+'d'#3'1'#1#8'ShortCut'#3'4@'#0#1#7'Command'#3'2'#1#8'ShortCut'#3'5@'#0#1#7'C'
+'ommand'#3'3'#1#8'ShortCut'#3'6@'#0#1#7'Command'#3'4'#1#8'ShortCut'#3'7@'#0#1
+#7'Command'#3'5'#1#8'ShortCut'#3'8@'#0#1#7'Command'#3'6'#1#8'ShortCut'#3'9@'
@ -112,31 +206,73 @@ LazarusResources.Add('TCodeTemplateDialog','FORMDATA',[
+'nd'#3#232#0#8'ShortCut'#3'C`'#0#1#7'Command'#3#233#0#8'ShortCut'#3'L`'#0#1#7
+'Command'#3'd'#2#8'ShortCut'#2#9#0#1#7'Command'#3'e'#2#8'ShortCut'#3#9' '#0#1
+#7'Command'#3#250#0#8'ShortCut'#3'B`'#0#0#13'Lines.Strings'#1#6#15'TemplateS'
+'ynEdit'#0#0#0#11'TCheckGroup'#23'AutoOnOptionsCheckGroup'#22'AnchorSideLeft'
+'.Control'#7#20'EditTemplateGroupBox'#21'AnchorSideTop.Control'#7#17'InsertM'
+'acroButton'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Contro'
+'l'#7#20'EditTemplateGroupBox'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Lef'
+'t'#2#6#6'Height'#2#30#3'Top'#2'!'#5'Width'#3#213#1#7'Anchors'#11#5'akTop'#6
+'akLeft'#7'akRight'#0#8'AutoFill'#9#8'AutoSize'#9#20'BorderSpacing.Around'#2
+#6#7'Caption'#6#23'AutoOnOptionsCheckGroup'#28'ChildSizing.LeftRightSpacing'
+#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7
+#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomoge'
+'nousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'C'
+'hildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29
+'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#2#7'Column'
+'s'#2#2#21'Constraints.MinHeight'#2#30#8'TabOrder'#2#3#0#0#0#6'TPanel'#8'Btn'
+'Panel'#6'Height'#2'#'#3'Top'#3#251#1#5'Width'#3#241#1#5'Align'#7#8'alBottom'
+#8'AutoSize'#9#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'#'#11'ClientWid'
+'th'#3#241#1#8'TabOrder'#2#3#0#7'TBitBtn'#8'OkButton'#21'AnchorSideBottom.Si'
+'de'#7#9'asrBottom'#4'Left'#3'O'#1#6'Height'#2#23#3'Top'#2#6#5'Width'#2'K'#5
,'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6
+#3'&OK'#20'Constraints.MinWidth'#2'K'#7'Default'#9#4'Kind'#7#4'bkOK'#11'Moda'
+'lResult'#2#1#9'NumGlyphs'#2#0#7'OnClick'#7#13'OkButtonClick'#8'TabOrder'#2#0
+#0#0#7'TBitBtn'#12'CancelButton'#20'AnchorSideRight.Side'#7#9'asrBottom'#21
+'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#160#1#6'Height'#2#23#3'Top'
+#2#6#5'Width'#2'K'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Arou'
+'nd'#2#6#6'Cancel'#9#7'Caption'#6#6'Cancel'#20'Constraints.MinWidth'#2'K'#4
+'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#8'TabOrder'#2#1#0#0
+#0#17'TSynFreePascalSyn'#10'ASynPasSyn'#7'Enabled'#8#14'NestedComments'#9#4
+'ynEdit'#0#11'MaxLeftChar'#3#0#4#7'MaxUndo'#3#0#4#7'Options'#11#12'eoAutoInd'
+'ent'#17'eoDragDropEditing'#11'eoGroupUndo'#15'eoScrollPastEol'#16'eoShowScr'
+'ollHint'#16'eoSmartTabDelete'#11'eoSmartTabs'#14'eoTabsToSpaces'#20'eoTrimT'
+'railingSpaces'#18'eoBracketHighlight'#0#8'Options2'#11#0#14'OverwriteCaret'
+#7#7'ctBlock'#8'ReadOnly'#8#9'RightEdge'#2'P'#14'RightEdgeColor'#7#8'clSilve'
+'r'#10'ScrollBars'#7#6'ssBoth'#13'SelectionMode'#7#8'smNormal'#8'TabWidth'#2
+#8#8'WantTabs'#8#0#0#11'TCheckGroup'#23'AutoOnOptionsCheckGroup'#22'AnchorSi'
+'deLeft.Control'#7#20'EditTemplateGroupBox'#21'AnchorSideTop.Control'#7#17'I'
+'nsertMacroButton'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.'
+'Control'#7#20'EditTemplateGroupBox'#20'AnchorSideRight.Side'#7#9'asrBottom'
+#4'Left'#2#6#6'Height'#2#30#3'Top'#2'&'#5'Width'#3#213#1#11'HelpContext'#2#0
+#5'Align'#7#6'alNone'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoFi'
+'ll'#9#8'AutoSize'#9#18'BorderSpacing.Left'#2#0#17'BorderSpacing.Top'#2#0#19
+'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20'BorderSpacing.Arou'
+'nd'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'#31'BorderSpacing.C'
+'ellAlignVertical'#7#7'ccaFill'#7'Caption'#6#23'AutoOnOptionsCheckGroup'#28
+'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'C'
+'hildSizing.HorizontalSpacing'#2#0#27'ChildSizing.VerticalSpacing'#2#0#29'Ch'
+'ildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.'
+'EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizo'
+'ntal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChil'
+'ds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizi'
+'ng.ControlsPerLine'#2#2#12'ColumnLayout'#7#24'clHorizontalThenVertical'#7'C'
+'olumns'#2#2#21'Constraints.MinHeight'#2#30#5'Ctl3D'#8#7'Enabled'#9#10'Paren'
+'tFont'#9#11'ParentColor'#9#11'ParentCtl3D'#9#14'ParentShowHint'#9#8'TabOrde'
+'r'#2#3#7'Visible'#9#0#0#0#6'TPanel'#8'BtnPanel'#4'Left'#2#0#6'Height'#2'2'#3
+'Top'#3#236#1#5'Width'#3#241#1#11'HelpContext'#2#0#5'Align'#7#8'alBottom'#9
+'Alignment'#7#8'taCenter'#8'AutoSize'#9#18'BorderSpacing.Left'#2#0#17'Border'
+'Spacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0#20
+'BorderSpacing.Around'#2#0'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFill'
+#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#10'BevelInner'#7#6'bvNone'
+#10'BevelOuter'#7#6'bvNone'#10'BevelWidth'#2#1#11'BorderWidth'#2#0#11'Border'
+'Style'#7#6'bsNone'#28'ChildSizing.LeftRightSpacing'#2#0#28'ChildSizing.TopB'
+'ottomSpacing'#2#0#29'ChildSizing.HorizontalSpacing'#2#0#27'ChildSizing.Vert'
+'icalSpacing'#2#0#27'ChildSizing.ControlsPerLine'#2#0#12'ClientHeight'#2'.'
+#11'ClientWidth'#3#237#1#8'DockSite'#8#10'DragCursor'#7#6'crDrag'#8'DragKind'
+#7#6'dkDrag'#8'DragMode'#7#8'dmManual'#7'Enabled'#9#11'FullRepaint'#9#11'Par'
+'entColor'#9#10'ParentFont'#9#14'ParentShowHint'#9#8'TabOrder'#2#3#7'TabStop'
+#8#7'Visible'#9#0#7'TBitBtn'#8'OkButton'#21'AnchorSideBottom.Side'#7#9'asrBo'
+'ttom'#4'Left'#3'F'#1#6'Height'#2'"'#3'Top'#2#6#5'Width'#2'K'#11'HelpContext'
+#2#0#5'Align'#7#7'alRight'#8'AutoSize'#9#18'BorderSpacing.Left'#2#0#17'Borde'
+'rSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2#0
+#20'BorderSpacing.Around'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'ccaFil'
+'l'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#6'Cancel'#8#7'Caption'#6
+#3'&OK'#20'Constraints.MinWidth'#2'K'#7'Default'#9#7'Enabled'#9#4'Kind'#7#4
+'bkOK'#6'Layout'#7#11'blGlyphLeft'#6'Margin'#2#255#11'ModalResult'#2#1#9'Num'
+'Glyphs'#2#0#7'OnClick'#7#13'OkButtonClick'#10'ParentFont'#9#14'ParentShowHi'
+'nt'#9#7'Spacing'#2#3#8'TabOrder'#2#0#7'TabStop'#9#7'Visible'#9#0#0#7'TBitBt'
+'n'#12'CancelButton'#20'AnchorSideRight.Side'#7#9'asrBottom'#21'AnchorSideBo'
+'ttom.Side'#7#9'asrBottom'#4'Left'#3#151#1#6'Height'#2'"'#3'Top'#2#6#5'Width'
+#2'P'#11'HelpContext'#2#0#5'Align'#7#7'alRight'#8'AutoSize'#9#18'BorderSpaci'
,'ng.Left'#2#0#17'BorderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'Borde'
+'rSpacing.Bottom'#2#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.CellAlignH'
+'orizontal'#7#7'ccaFill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#6
+'Cancel'#9#7'Caption'#6#6'Cancel'#20'Constraints.MinWidth'#2'K'#7'Default'#8
+#7'Enabled'#9#4'Kind'#7#8'bkCancel'#6'Layout'#7#11'blGlyphLeft'#6'Margin'#2
+#255#11'ModalResult'#2#2#9'NumGlyphs'#2#0#10'ParentFont'#9#14'ParentShowHint'
+#9#7'Spacing'#2#3#8'TabOrder'#2#1#7'TabStop'#9#7'Visible'#9#0#0#7'TBitBtn'#10
+'HelpButton'#4'Left'#2#6#6'Height'#2'"'#3'Top'#2#6#5'Width'#2'B'#11'HelpCont'
+'ext'#2#0#5'Align'#7#6'alLeft'#8'AutoSize'#9#18'BorderSpacing.Left'#2#0#17'B'
+'orderSpacing.Top'#2#0#19'BorderSpacing.Right'#2#0#20'BorderSpacing.Bottom'#2
+#0#20'BorderSpacing.Around'#2#6'!BorderSpacing.CellAlignHorizontal'#7#7'ccaF'
+'ill'#31'BorderSpacing.CellAlignVertical'#7#7'ccaFill'#6'Cancel'#8#7'Caption'
+#6#5'&Help'#7'Default'#8#7'Enabled'#9#4'Kind'#7#6'bkHelp'#6'Layout'#7#11'blG'
+'lyphLeft'#6'Margin'#2#255#11'ModalResult'#2#0#9'NumGlyphs'#2#0#7'OnClick'#7
+#15'HelpButtonClick'#10'ParentFont'#9#14'ParentShowHint'#9#7'Spacing'#2#3#8
+'TabOrder'#2#2#7'TabStop'#9#7'Visible'#9#0#0#0#17'TSynFreePascalSyn'#10'ASyn'
+'PasSyn'#7'Enabled'#8#12'CompilerMode'#7#9'pcmObjFPC'#14'NestedComments'#9#4
+'left'#3'0'#1#3'top'#3'X'#1#0#0#0
]);

View File

@ -41,7 +41,8 @@ uses
// IDEIntf
IDECommands, TextTools, SrcEditorIntf, MenuIntf, IDEWindowIntf, LazIDEIntf,
// IDE
IDEProcs, InputHistory, LazarusIDEStrConsts, EditorOptions, CodeMacroSelect;
IDEProcs, InputHistory, LazarusIDEStrConsts, EditorOptions, CodeMacroSelect,
IDEContextHelpEdit;
type
TAutoCompleteOption = (
@ -67,6 +68,7 @@ type
AddButton: TButton;
ASynPasSyn: TSynFreePascalSyn;
AutoOnOptionsCheckGroup: TCheckGroup;
HelpButton: TBitBtn;
EditTemplateGroupBox: TGroupBox;
OkButton: TBitBtn;
CancelButton: TBitBtn;
@ -88,6 +90,7 @@ type
procedure FilenameButtonClick(Sender: TObject);
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
procedure FormCreate(Sender: TObject);
procedure HelpButtonClick(Sender: TObject);
procedure InsertMacroButtonClick(Sender: TObject);
procedure OkButtonClick(Sender: TObject);
procedure OnCopyMenuItem(Sender: TObject);
@ -695,6 +698,7 @@ begin
OkButton.Caption:=lisLazBuildOk;
OkButton.LoadGlyphFromLazarusResource('btn_ok');
CancelButton.LoadGlyphFromLazarusResource('btn_cancel');
HelpButton.LoadGlyphFromLazarusResource('btn_help');
FilenameGroupBox.Caption:=lisToDoLFile;
UseMacrosCheckBox.Caption:=lisEnableMacros;
InsertMacroButton.Caption:=lisCTInsertMacro;
@ -741,6 +745,11 @@ begin
BuildPopupMenu;
end;
procedure TCodeTemplateDialog.HelpButtonClick(Sender: TObject);
begin
ShowContextHelpForIDE(Self);
end;
procedure TCodeTemplateDialog.InsertMacroButtonClick(Sender: TObject);
begin
DoInsertMacro;