object CodeTemplateDialog: TCodeTemplateDialog
Left = 332
Height = 540
Top = 174
Width = 729
BorderIcons = [biSystemMenu]
Caption = 'CodeTemplateDialog'
ClientHeight = 540
ClientWidth = 729
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '1.5'
object FilenameGroupBox: TGroupBox
Left = 6
Height = 51
Top = 6
Width = 717
Align = alTop
BorderSpacing.Around = 6
Caption = 'FilenameGroupBox'
ClientHeight = 31
ClientWidth = 713
TabOrder = 0
object FilenameEdit: TFileNameEdit
AnchorSideLeft.Control = FilenameGroupBox
AnchorSideRight.Control = FilenameGroupBox
AnchorSideRight.Side = asrBottom
Left = 6
Height = 23
Top = 4
Width = 701
FileName = 'FilenameEdit'
FilterIndex = 0
HideDirectories = False
ButtonWidth = 45
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Right = 6
MaxLength = 0
TabOrder = 0
Text = 'FilenameEdit'
end
end
object TemplatesGroupBox: TGroupBox
Left = 6
Height = 167
Top = 63
Width = 717
Align = alTop
BorderSpacing.Around = 6
Caption = 'TemplatesGroupBox'
ClientHeight = 147
ClientWidth = 713
TabOrder = 1
object TemplateListBox: TListBox
AnchorSideLeft.Control = TemplatesGroupBox
AnchorSideTop.Control = TemplatesGroupBox
AnchorSideRight.Control = AddButton
AnchorSideBottom.Control = TemplatesGroupBox
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 135
Top = 6
Width = 547
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
ItemHeight = 0
OnSelectionChange = TemplateListBoxSelectionChange
TabOrder = 0
end
object AddButton: TButton
AnchorSideTop.Control = TemplateListBox
AnchorSideRight.Control = TemplatesGroupBox
AnchorSideRight.Side = asrBottom
Left = 559
Height = 25
Top = 6
Width = 148
Anchors = [akTop, akRight]
BorderSpacing.Right = 6
Caption = 'AddButton'
OnClick = AddButtonClick
TabOrder = 1
end
object DeleteButton: TButton
AnchorSideLeft.Control = AddButton
AnchorSideTop.Control = AddButton
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = AddButton
AnchorSideRight.Side = asrBottom
Left = 559
Height = 25
Top = 37
Width = 148
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'DeleteButton'
OnClick = DeleteButtonClick
TabOrder = 2
end
object RenameButton: TButton
AnchorSideLeft.Control = AddButton
AnchorSideTop.Control = DeleteButton
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = DeleteButton
AnchorSideRight.Side = asrBottom
Left = 559
Height = 25
Top = 68
Width = 148
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 6
Caption = 'RenameButton'
OnClick = RenameButtonClick
TabOrder = 3
end
end
object EditTemplateGroupBox: TGroupBox
AnchorSideTop.Control = TemplatesGroupBox
AnchorSideRight.Control = Owner
AnchorSideBottom.Control = FilenameGroupBox
Left = 6
Height = 266
Top = 236
Width = 717
Align = alClient
BorderSpacing.Around = 6
Caption = 'EditTemplateGroupBox'
ClientHeight = 246
ClientWidth = 713
TabOrder = 2
inline TemplateSynEdit: TSynEdit
AnchorSideTop.Control = AutoOnOptionsCheckGroup
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = EditTemplateGroupBox
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = EditTemplateGroupBox
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 162
Top = 78
Width = 701
BorderSpacing.Around = 6
Anchors = [akTop, akLeft, akRight, akBottom]
Font.Height = -14
Font.Name = 'courier'
Font.Pitch = fpFixed
Font.Quality = fqNonAntialiased
ParentColor = False
ParentFont = False
TabOrder = 2
Gutter.Width = 57
Gutter.MouseActions = <
item
ClickCount = ccAny
ClickDir = cdDown
Command = emcOnMainGutterClick
end
item
Button = mbRight
Command = emcContextMenu
end>
RightGutter.Width = 0
RightGutter.MouseActions = <
item
ClickCount = ccAny
ClickDir = cdDown
Command = emcOnMainGutterClick
end
item
Button = mbRight
Command = emcContextMenu
end>
Keystrokes = <
item
Command = ecUp
ShortCut = 38
end
item
Command = ecSelUp
ShortCut = 8230
end
item
Command = ecScrollUp
ShortCut = 16422
end
item
Command = ecDown
ShortCut = 40
end
item
Command = ecSelDown
ShortCut = 8232
end
item
Command = ecScrollDown
ShortCut = 16424
end
item
Command = ecLeft
ShortCut = 37
end
item
Command = ecSelLeft
ShortCut = 8229
end
item
Command = ecWordLeft
ShortCut = 16421
end
item
Command = ecSelWordLeft
ShortCut = 24613
end
item
Command = ecRight
ShortCut = 39
end
item
Command = ecSelRight
ShortCut = 8231
end
item
Command = ecWordRight
ShortCut = 16423
end
item
Command = ecSelWordRight
ShortCut = 24615
end
item
Command = ecPageDown
ShortCut = 34
end
item
Command = ecSelPageDown
ShortCut = 8226
end
item
Command = ecPageBottom
ShortCut = 16418
end
item
Command = ecSelPageBottom
ShortCut = 24610
end
item
Command = ecPageUp
ShortCut = 33
end
item
Command = ecSelPageUp
ShortCut = 8225
end
item
Command = ecPageTop
ShortCut = 16417
end
item
Command = ecSelPageTop
ShortCut = 24609
end
item
Command = ecLineStart
ShortCut = 36
end
item
Command = ecSelLineStart
ShortCut = 8228
end
item
Command = ecEditorTop
ShortCut = 16420
end
item
Command = ecSelEditorTop
ShortCut = 24612
end
item
Command = ecLineEnd
ShortCut = 35
end
item
Command = ecSelLineEnd
ShortCut = 8227
end
item
Command = ecEditorBottom
ShortCut = 16419
end
item
Command = ecSelEditorBottom
ShortCut = 24611
end
item
Command = ecToggleMode
ShortCut = 45
end
item
Command = ecCopy
ShortCut = 16429
end
item
Command = ecPaste
ShortCut = 8237
end
item
Command = ecDeleteChar
ShortCut = 46
end
item
Command = ecCut
ShortCut = 8238
end
item
Command = ecDeleteLastChar
ShortCut = 8
end
item
Command = ecDeleteLastChar
ShortCut = 8200
end
item
Command = ecDeleteLastWord
ShortCut = 16392
end
item
Command = ecUndo
ShortCut = 32776
end
item
Command = ecRedo
ShortCut = 40968
end
item
Command = ecLineBreak
ShortCut = 13
end
item
Command = ecSelectAll
ShortCut = 16449
end
item
Command = ecCopy
ShortCut = 16451
end
item
Command = ecBlockIndent
ShortCut = 24649
end
item
Command = ecLineBreak
ShortCut = 16461
end
item
Command = ecInsertLine
ShortCut = 16462
end
item
Command = ecDeleteWord
ShortCut = 16468
end
item
Command = ecBlockUnindent
ShortCut = 24661
end
item
Command = ecPaste
ShortCut = 16470
end
item
Command = ecCut
ShortCut = 16472
end
item
Command = ecDeleteLine
ShortCut = 16473
end
item
Command = ecDeleteEOL
ShortCut = 24665
end
item
Command = ecUndo
ShortCut = 16474
end
item
Command = ecRedo
ShortCut = 24666
end
item
Command = ecGotoMarker0
ShortCut = 16432
end
item
Command = ecGotoMarker1
ShortCut = 16433
end
item
Command = ecGotoMarker2
ShortCut = 16434
end
item
Command = ecGotoMarker3
ShortCut = 16435
end
item
Command = ecGotoMarker4
ShortCut = 16436
end
item
Command = ecGotoMarker5
ShortCut = 16437
end
item
Command = ecGotoMarker6
ShortCut = 16438
end
item
Command = ecGotoMarker7
ShortCut = 16439
end
item
Command = ecGotoMarker8
ShortCut = 16440
end
item
Command = ecGotoMarker9
ShortCut = 16441
end
item
Command = ecSetMarker0
ShortCut = 24624
end
item
Command = ecSetMarker1
ShortCut = 24625
end
item
Command = ecSetMarker2
ShortCut = 24626
end
item
Command = ecSetMarker3
ShortCut = 24627
end
item
Command = ecSetMarker4
ShortCut = 24628
end
item
Command = ecSetMarker5
ShortCut = 24629
end
item
Command = ecSetMarker6
ShortCut = 24630
end
item
Command = ecSetMarker7
ShortCut = 24631
end
item
Command = ecSetMarker8
ShortCut = 24632
end
item
Command = ecSetMarker9
ShortCut = 24633
end
item
Command = ecNormalSelect
ShortCut = 24654
end
item
Command = ecColumnSelect
ShortCut = 24643
end
item
Command = ecLineSelect
ShortCut = 24652
end
item
Command = ecTab
ShortCut = 9
end
item
Command = ecShiftTab
ShortCut = 8201
end
item
Command = ecMatchBracket
ShortCut = 24642
end>
MouseActions = <
item
ShiftMask = [ssShift, ssAlt]
ClickDir = cdDown
Command = emcStartSelections
MoveCaret = True
end
item
Shift = [ssShift]
ShiftMask = [ssShift, ssAlt]
ClickDir = cdDown
Command = emcStartSelections
MoveCaret = True
Option = 1
end
item
Shift = [ssAlt]
ShiftMask = [ssShift, ssAlt]
ClickDir = cdDown
Command = emcStartColumnSelections
MoveCaret = True
end
item
Shift = [ssShift, ssAlt]
ShiftMask = [ssShift, ssAlt]
ClickDir = cdDown
Command = emcStartColumnSelections
MoveCaret = True
Option = 1
end
item
Button = mbRight
Command = emcContextMenu
end
item
ClickCount = ccDouble
ClickDir = cdDown
Command = emcSelectWord
MoveCaret = True
end
item
ClickCount = ccTriple
ClickDir = cdDown
Command = emcSelectLine
MoveCaret = True
end
item
ClickCount = ccQuad
ClickDir = cdDown
Command = emcSelectPara
MoveCaret = True
end
item
Button = mbMiddle
ClickDir = cdDown
Command = emcPasteSelection
MoveCaret = True
end
item
Shift = [ssCtrl]
ShiftMask = [ssShift, ssAlt, ssCtrl]
Command = emcMouseLink
end>
MouseTextActions = <>
MouseSelActions = <
item
ClickDir = cdDown
Command = emcStartDragMove
end>
VisibleSpecialChars = [vscSpace, vscTabAtLast]
SelectedColor.BackPriority = 50
SelectedColor.ForePriority = 50
SelectedColor.FramePriority = 50
SelectedColor.BoldPriority = 50
SelectedColor.ItalicPriority = 50
SelectedColor.UnderlinePriority = 50
SelectedColor.StrikeOutPriority = 50
BracketHighlightStyle = sbhsBoth
BracketMatchColor.Background = clNone
BracketMatchColor.Foreground = clNone
BracketMatchColor.Style = [fsBold]
FoldedCodeColor.Background = clNone
FoldedCodeColor.Foreground = clGray
FoldedCodeColor.FrameColor = clGray
MouseLinkColor.Background = clNone
MouseLinkColor.Foreground = clBlue
LineHighlightColor.Background = clNone
LineHighlightColor.Foreground = clNone
inline TSynGutterPartList
object TSynGutterMarks
Width = 24
MouseActions = <>
end
object TSynGutterLineNumber
Width = 17
MouseActions = <>
MarkupInfo.Background = clBtnFace
MarkupInfo.Foreground = clNone
DigitCount = 2
ShowOnlyLineNumbersMultiplesOf = 1
ZeroStart = False
LeadingZeros = False
end
object TSynGutterChanges
Width = 4
MouseActions = <>
ModifiedColor = 59900
SavedColor = clGreen
end
object TSynGutterSeparator
Width = 2
MouseActions = <>
MarkupInfo.Background = clWhite
MarkupInfo.Foreground = clGray
end
object TSynGutterCodeFolding
MouseActions = <
item
Button = mbRight
Command = emcCodeFoldContextMenu
end
item
ShiftMask = [ssShift]
Button = mbMiddle
ClickCount = ccAny
ClickDir = cdDown
Command = emcCodeFoldCollaps
end
item
Shift = [ssShift]
ShiftMask = [ssShift]
Button = mbMiddle
ClickCount = ccAny
ClickDir = cdDown
Command = emcCodeFoldCollaps
Option = 1
end
item
ClickCount = ccAny
ClickDir = cdDown
Command = emcNone
end>
MarkupInfo.Background = clNone
MarkupInfo.Foreground = clGray
MouseActionsExpanded = <
item
ClickCount = ccAny
ClickDir = cdDown
Command = emcCodeFoldCollaps
end>
MouseActionsCollapsed = <
item
Shift = [ssCtrl]
ShiftMask = [ssCtrl]
ClickCount = ccAny
ClickDir = cdDown
Command = emcCodeFoldExpand
end
item
ShiftMask = [ssCtrl]
ClickCount = ccAny
ClickDir = cdDown
Command = emcCodeFoldExpand
Option = 1
end>
end
end
end
object AutoOnOptionsCheckGroup: TCheckGroup
AnchorSideLeft.Control = OptionsPanel
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = EditTemplateGroupBox
AnchorSideRight.Control = EditTemplateGroupBox
AnchorSideRight.Side = asrBottom
Left = 168
Height = 70
Top = 2
Width = 543
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Left = 10
BorderSpacing.Top = 2
BorderSpacing.Right = 2
Caption = 'AutoOnOptionsCheckGroup'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 2
Columns = 2
Constraints.MinHeight = 70
TabOrder = 1
end
object OptionsPanel: TPanel
AnchorSideLeft.Control = EditTemplateGroupBox
AnchorSideTop.Control = EditTemplateGroupBox
Left = 0
Height = 81
Top = 0
Width = 158
AutoSize = True
BevelOuter = bvNone
ClientHeight = 81
ClientWidth = 158
TabOrder = 0
object KeepSubIndentCheckBox: TCheckBox
AnchorSideLeft.Control = OptionsPanel
AnchorSideTop.Control = OptionsPanel
Left = 6
Height = 19
Top = 6
Width = 152
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'KeepSubIndentCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object UseMacrosCheckBox: TCheckBox
AnchorSideLeft.Control = OptionsPanel
AnchorSideTop.Control = KeepSubIndentCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 19
Top = 25
Width = 130
BorderSpacing.Left = 6
Caption = 'UseMacrosCheckBox'
OnChange = UseMacrosCheckBoxChange
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
object InsertMacroButton: TButton
AnchorSideLeft.Control = OptionsPanel
AnchorSideTop.Control = UseMacrosCheckBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 6
Height = 25
Top = 50
Width = 125
AutoSize = True
BorderSpacing.Around = 6
Caption = 'InsertMacroButton'
OnClick = InsertMacroButtonClick
TabOrder = 2
end
end
end
object ButtonPanel: TButtonPanel
Left = 6
Height = 26
Top = 508
Width = 717
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
OKButton.OnClick = OkButtonClick
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
HelpButton.OnClick = HelpButtonClick
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CloseButton.Enabled = False
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 3
ShowButtons = [pbOK, pbCancel, pbHelp]
ShowBevel = False
end
object ASynPasSyn: TSynFreePascalSyn
Enabled = False
CompilerMode = pcmObjFPC
NestedComments = True
left = 304
top = 344
end
end