lazarus/doceditor/fpdocupdater/mainunit.lfm

324 lines
7.8 KiB
Plaintext

object FormMain: TFormMain
Left = 253
Height = 542
Top = 138
Width = 598
HorzScrollBar.Page = 597
VertScrollBar.Page = 527
Caption = 'FPDoc Updater'
ClientHeight = 542
ClientWidth = 598
Constraints.MinHeight = 525
Constraints.MinWidth = 300
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
LCLVersion = '2.3.0.0'
object LabelDocs: TLabel
AnchorSideTop.Control = EditDocs
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = EditDocs
Left = 70
Height = 19
Top = 18
Width = 103
Anchors = [akTop, akRight]
BorderSpacing.Right = 7
Caption = 'FPDoc files path:'
ParentColor = False
end
object LabelUnits: TLabel
AnchorSideTop.Control = EditUnits
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = EditUnits
Left = 105
Height = 19
Top = 58
Width = 68
Anchors = [akTop, akRight]
BorderSpacing.Right = 7
Caption = 'Units path:'
ParentColor = False
end
object LabelBackup: TLabel
AnchorSideLeft.Control = ListBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CheckBoxBackup
AnchorSideTop.Side = asrBottom
Left = 426
Height = 19
Top = 271
Width = 113
BorderSpacing.Left = 6
BorderSpacing.Top = 9
Caption = 'Backup extension:'
ParentColor = False
end
object LabelPackage: TLabel
AnchorSideLeft.Control = ListBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ListBox
Left = 426
Height = 19
Top = 170
Width = 54
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
Caption = 'Package:'
ParentColor = False
end
object LabelMakeSkel: TLabel
AnchorSideTop.Control = EditMakeSkel
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = EditMakeSkel
Left = 50
Height = 19
Top = 136
Width = 123
Anchors = [akTop, akRight]
BorderSpacing.Right = 7
Caption = 'MakeSkel tool path:'
ParentColor = False
end
object LabelInclude: TLabel
AnchorSideTop.Control = EditInclude
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = EditInclude
Left = 63
Height = 19
Top = 98
Width = 110
Anchors = [akTop, akRight]
BorderSpacing.Right = 7
Caption = 'Include files path:'
ParentColor = False
end
object EditDocs: TDirectoryEdit
Left = 180
Height = 31
Top = 12
Width = 368
ShowHidden = False
ButtonWidth = 45
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
MaxLength = 0
TabOrder = 0
OnChange = EditDocsChange
end
object EditUnits: TDirectoryEdit
AnchorSideLeft.Control = EditDocs
AnchorSideTop.Control = EditDocs
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = EditDocs
AnchorSideRight.Side = asrBottom
Left = 180
Height = 31
Top = 52
Width = 368
ShowHidden = False
ButtonWidth = 45
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 9
MaxLength = 0
TabOrder = 1
OnChange = EditUnitsChange
end
object ButtonUpdate: TButton
AnchorSideLeft.Control = ButtonRefresh
AnchorSideTop.Control = ButtonRefresh
AnchorSideTop.Side = asrBottom
Left = 426
Height = 25
Top = 428
Width = 122
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 15
BorderSpacing.InnerBorder = 4
Caption = 'Update'
OnClick = ButtonUpdateClick
TabOrder = 2
end
object ButtonUpdateAll: TButton
AnchorSideLeft.Control = ButtonUpdateNew
AnchorSideTop.Control = ButtonUpdateNew
AnchorSideTop.Side = asrBottom
Left = 426
Height = 25
Top = 496
Width = 122
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 9
BorderSpacing.InnerBorder = 4
Caption = 'Update All'
OnClick = ButtonUpdateAllClick
TabOrder = 3
end
object ButtonUpdateNew: TButton
AnchorSideLeft.Control = ButtonUpdate
AnchorSideTop.Control = ButtonUpdate
AnchorSideTop.Side = asrBottom
Left = 426
Height = 25
Top = 462
Width = 122
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 9
BorderSpacing.InnerBorder = 4
Caption = 'Update New'
Font.Color = clRed
OnClick = ButtonUpdateNewClick
ParentFont = False
TabOrder = 4
end
object ButtonRefresh: TButton
AnchorSideLeft.Control = ListBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = CheckBoxShowSummary
AnchorSideTop.Side = asrBottom
Left = 426
Height = 25
Top = 388
Width = 122
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Top = 25
BorderSpacing.InnerBorder = 4
Caption = 'Refresh'
OnClick = ButtonRefreshClick
TabOrder = 5
end
object ListBox: TListBox
AnchorSideTop.Control = EditMakeSkel
AnchorSideTop.Side = asrBottom
Left = 11
Height = 339
Top = 170
Width = 409
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Top = 9
ItemHeight = 0
MultiSelect = True
OnDrawItem = ListBoxDrawItem
Style = lbOwnerDrawFixed
TabOrder = 6
TopIndex = -1
end
object CheckBoxBackup: TCheckBox
AnchorSideLeft.Control = ListBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = EditPackage
AnchorSideTop.Side = asrBottom
Left = 426
Height = 21
Top = 241
Width = 140
BorderSpacing.Left = 6
BorderSpacing.Top = 15
Caption = 'Backup FPDoc files'
Checked = True
State = cbChecked
TabOrder = 7
end
object EditBackup: TEdit
AnchorSideLeft.Control = ListBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = LabelBackup
AnchorSideTop.Side = asrBottom
Left = 444
Height = 31
Top = 296
Width = 80
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 24
BorderSpacing.Top = 6
TabOrder = 8
Text = 'bak'
end
object EditPackage: TEdit
AnchorSideLeft.Control = ListBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = LabelPackage
AnchorSideTop.Side = asrBottom
Left = 444
Height = 31
Top = 195
Width = 80
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 24
BorderSpacing.Top = 6
TabOrder = 9
Text = 'lcl'
end
object EditMakeSkel: TFileNameEdit
AnchorSideLeft.Control = EditInclude
AnchorSideTop.Control = LabelInclude
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = EditInclude
AnchorSideRight.Side = asrBottom
Left = 180
Height = 31
Top = 130
Width = 368
DialogOptions = []
FilterIndex = 0
HideDirectories = False
ButtonWidth = 45
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 13
MaxLength = 0
TabOrder = 10
end
object EditInclude: TDirectoryEdit
AnchorSideLeft.Control = EditUnits
AnchorSideTop.Control = EditUnits
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = EditUnits
AnchorSideRight.Side = asrBottom
Left = 180
Height = 31
Top = 92
Width = 368
ShowHidden = False
ButtonWidth = 45
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 9
MaxLength = 0
TabOrder = 11
end
object StatusBar: TStatusBar
Left = 0
Height = 21
Top = 521
Width = 598
Panels = <>
end
object CheckBoxShowSummary: TCheckBox
AnchorSideLeft.Control = ListBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = EditBackup
AnchorSideTop.Side = asrBottom
Left = 426
Height = 21
Top = 342
Width = 120
BorderSpacing.Left = 6
BorderSpacing.Top = 15
Caption = 'Show summary'
Checked = True
State = cbChecked
TabOrder = 12
end
object OpenDialog: TOpenDialog
Title = 'Open FPDoc file'
DefaultExt = '.xml'
Filter = 'FPDoc file (*.xml)|*.xml|All files|*.*'
Options = [ofFileMustExist, ofEnableSizing, ofViewDetail]
Left = 24
Top = 168
end
end