lazarus/examples/fpdocmanager/fmain.lfm
2012-03-08 19:54:52 +00:00

1021 lines
25 KiB
Plaintext

object Main: TMain
Left = 335
Height = 507
Top = 146
Width = 569
Align = alClient
Caption = 'Main'
ClientHeight = 487
ClientWidth = 569
Menu = MainMenu1
OnCreate = FormCreate
OnResize = FormResize
ShowHint = True
LCLVersion = '0.9.31'
object lbPackages: TComboBox
Left = 0
Height = 464
Top = 0
Width = 94
Align = alLeft
ItemHeight = 15
OnSelect = lbPackagesClick
Style = csSimple
TabOrder = 0
end
object Units: TPageControl
Left = 94
Height = 464
Top = 0
Width = 475
ActivePage = ViewUnits
Align = alClient
TabIndex = 0
TabOrder = 1
object ViewUnits: TTabSheet
Caption = 'Units'
ClientHeight = 436
ClientWidth = 467
object lbUnits: TListBox
Left = 0
Height = 436
Hint = 'Double click to edit the description file'
Top = 0
Width = 100
Align = alLeft
ItemHeight = 0
OnClick = lbUnitsClick
OnDblClick = lbUnitsDblClick
TabOrder = 0
end
object Panel1: TPanel
Left = 100
Height = 436
Top = 0
Width = 367
Align = alClient
Caption = 'Panel1'
ClientHeight = 436
ClientWidth = 367
TabOrder = 1
object GroupBox1: TGroupBox
Left = 1
Height = 339
Top = 96
Width = 365
Align = alClient
Caption = 'Actions'
ClientHeight = 321
ClientWidth = 361
TabOrder = 0
object swAll: TRadioButton
Left = 10
Height = 19
Hint = 'Action on all package units'
Top = 10
Width = 32
Caption = 'all'
Checked = True
TabOrder = 0
TabStop = True
end
object swSingle: TRadioButton
Left = 48
Height = 19
Hint = 'Actions only on the selected unit'
Top = 10
Width = 43
Caption = 'only'
OnClick = swSingleClick
TabOrder = 1
end
object edUnit: TEdit
Left = 96
Height = 23
Hint = 'The selected unit'
Top = 10
Width = 260
Anchors = [akTop, akLeft, akRight]
ReadOnly = True
TabOrder = 2
end
object buRefresh: TButton
Left = 96
Height = 25
Hint = 'Update descriptions from source files'
Top = 40
Width = 75
Caption = 'Refresh'
OnClick = buRefreshClick
TabOrder = 3
end
object buShowLog: TButton
Left = 10
Height = 25
Top = 208
Width = 68
Caption = 'Show Log'
TabOrder = 4
end
object edLog: TEdit
Left = 88
Height = 23
Top = 208
Width = 267
Anchors = [akTop, akLeft, akRight]
OnChange = edLogChange
TabOrder = 5
end
object buTest: TButton
Left = 9
Height = 25
Hint = 'Syntax check of the description file'
Top = 40
Width = 75
Caption = 'Test only'
OnClick = buTestClick
TabOrder = 6
end
object swShowUpdate: TCheckBox
Left = 248
Height = 19
Top = 176
Width = 90
Caption = 'Show Update'
OnChange = swShowUpdateChange
TabOrder = 7
end
object optUpd: TCheckGroup
Left = 8
Height = 129
Top = 72
Width = 216
AutoFill = True
Caption = 'Hide...'
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
Items.Strings = (
'Declaration'
'Overrides'
'Errors'
'SeeAlso'
'Arguments'
'Results'
'Private'
'Protected'
'Class Separators'
)
OnItemClick = optUpdItemClick
TabOrder = 8
Data = {
09000000020202020202030202
}
end
object swSortNodes: TCheckBox
Left = 248
Height = 19
Top = 96
Width = 78
Caption = 'Sort Nodes'
TabOrder = 9
end
end
object gbAltDir: TGroupBox
Left = 1
Height = 95
Top = 1
Width = 365
Align = alTop
Caption = 'Descriptions'
ClientHeight = 77
ClientWidth = 361
TabOrder = 1
object Label8: TLabel
Left = 10
Height = 16
Top = 10
Width = 39
Caption = 'Default'
ParentColor = False
end
object Label9: TLabel
Left = 10
Height = 16
Top = 39
Width = 40
Caption = 'Lazarus'
ParentColor = False
end
object edDescrDir: TEdit
Left = 63
Height = 23
Top = 7
Width = 288
Anchors = [akTop, akLeft, akRight]
ReadOnly = True
TabOrder = 0
end
object edDescrLaz: TEdit
Left = 63
Height = 23
Top = 35
Width = 288
Anchors = [akTop, akLeft, akRight]
TabOrder = 1
end
end
end
end
object ViewFinal: TTabSheet
Caption = 'Document'
ClientHeight = 436
ClientWidth = 467
object Label1: TLabel
Left = 10
Height = 16
Top = 40
Width = 39
Caption = 'Format'
ParentColor = False
end
object cbFormat: TComboBox
Left = 71
Height = 23
Hint = 'The document output format'
Top = 40
Width = 375
ItemHeight = 15
OnSelect = cbFormatSelect
ParentColor = True
Style = csDropDownList
TabOrder = 0
end
object swDocOpts: TCheckGroup
Left = 10
Height = 160
Top = 144
Width = 220
AutoFill = True
Caption = 'Options'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
Items.Strings = (
'Stop on parser error'
'Warn on missing description'
'Hide protected'
'Show privates'
'Interface only'
'Don''t trim'
'Verbose'
)
OnItemClick = optUpdItemClick
TabOrder = 1
Data = {
0700000002030202030202
}
end
object Label2: TLabel
Left = 10
Height = 16
Top = 314
Width = 50
Caption = 'OSTarget'
ParentColor = False
end
object Label3: TLabel
Left = 10
Height = 16
Top = 342
Width = 58
Caption = 'CPUTarget'
ParentColor = False
end
object Label4: TLabel
Left = 10
Height = 16
Top = 371
Width = 53
Caption = 'Language'
ParentColor = False
end
object Label5: TLabel
Left = 10
Height = 16
Top = 410
Width = 34
Caption = 'MoDir'
ParentColor = False
end
object Label6: TLabel
Left = 246
Height = 16
Top = 144
Width = 91
Caption = 'Backend Options'
ParentColor = False
end
object buMakeDoc: TButton
Left = 296
Height = 25
Hint = 'Create the docs for the selected package'
Top = 8
Width = 146
AutoSize = True
Caption = 'Create Documentation'
OnClick = buMakeDocClick
TabOrder = 2
end
object edOS: TEdit
Left = 82
Height = 23
Top = 314
Width = 148
OnExit = edOSExit
TabOrder = 3
end
object edCPU: TEdit
Left = 82
Height = 23
Top = 342
Width = 148
OnExit = edOSExit
TabOrder = 4
end
object edLang: TEdit
Left = 82
Height = 23
Top = 371
Width = 148
OnExit = edOSExit
TabOrder = 5
end
object edMoDir: TEdit
Left = 82
Height = 23
Top = 403
Width = 364
OnExit = edOSExit
TabOrder = 6
end
object Label7: TLabel
Left = 10
Height = 16
Top = 10
Width = 35
Caption = 'Profile'
ParentColor = False
end
object cbProfile: TComboBox
Left = 66
Height = 23
Hint = 'Available build profiles'
Top = 8
Width = 100
ItemHeight = 15
OnSelect = cbProfileSelect
TabOrder = 7
end
object buNewProfile: TButton
Left = 174
Height = 25
Hint = 'Create a new profile'
Top = 8
Width = 51
Caption = 'Save'
OnClick = buNewProfileClick
TabOrder = 8
end
object edOutput: TEdit
Left = 93
Height = 23
Hint = 'Create the docs in this location,'#13#10'in the project directory if empty.'
Top = 72
Width = 353
TabOrder = 9
end
object edBackend: TMemo
Left = 246
Height = 224
Hint = 'Enter command=value pairs'
Top = 168
Width = 200
OnExit = lbBackendExit
ParentShowHint = False
ShowHint = True
TabOrder = 10
end
object edDefOut: TEdit
Left = 93
Height = 23
Top = 100
Width = 354
ReadOnly = True
TabOrder = 11
end
object swOutput: TRadioButton
Left = 14
Height = 19
Hint = 'Write the docs into the specified location'
Top = 72
Width = 58
Caption = 'Output'
TabOrder = 13
end
object swDefOut: TRadioButton
Left = 14
Height = 19
Hint = 'Select to use the default location,'#13#10'in your global documentation directory'
Top = 100
Width = 58
Caption = 'Default'
Checked = True
TabOrder = 12
TabStop = True
end
end
object ViewXML: TTabSheet
Caption = 'Project'
ClientHeight = 436
ClientWidth = 467
inline edXML: TSynEdit
Left = 0
Height = 436
Top = 0
Width = 467
Align = alClient
Font.Height = -13
Font.Name = 'Courier New'
Font.Pitch = fpFixed
Font.Quality = fqNonAntialiased
ParentColor = False
ParentFont = False
TabOrder = 0
OnExit = edXMLExit
Gutter.Visible = False
Gutter.Width = 57
Gutter.MouseActions = <>
RightGutter.Width = 0
RightGutter.MouseActions = <>
Highlighter = SynXMLSyn1
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 = EcFoldLevel1
ShortCut = 41009
end
item
Command = EcFoldLevel2
ShortCut = 41010
end
item
Command = EcFoldLevel1
ShortCut = 41011
end
item
Command = EcFoldLevel1
ShortCut = 41012
end
item
Command = EcFoldLevel1
ShortCut = 41013
end
item
Command = EcFoldLevel6
ShortCut = 41014
end
item
Command = EcFoldLevel7
ShortCut = 41015
end
item
Command = EcFoldLevel8
ShortCut = 41016
end
item
Command = EcFoldLevel9
ShortCut = 41017
end
item
Command = EcFoldLevel0
ShortCut = 41008
end
item
Command = EcFoldCurrent
ShortCut = 41005
end
item
Command = EcUnFoldCurrent
ShortCut = 41003
end
item
Command = EcToggleMarkupWord
ShortCut = 32845
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
item
Command = ecColSelUp
ShortCut = 40998
end
item
Command = ecColSelDown
ShortCut = 41000
end
item
Command = ecColSelLeft
ShortCut = 40997
end
item
Command = ecColSelRight
ShortCut = 40999
end
item
Command = ecColSelPageDown
ShortCut = 40994
end
item
Command = ecColSelPageBottom
ShortCut = 57378
end
item
Command = ecColSelPageUp
ShortCut = 40993
end
item
Command = ecColSelPageTop
ShortCut = 57377
end
item
Command = ecColSelLineStart
ShortCut = 40996
end
item
Command = ecColSelLineEnd
ShortCut = 40995
end
item
Command = ecColSelEditorTop
ShortCut = 57380
end
item
Command = ecColSelEditorBottom
ShortCut = 57379
end>
MouseActions = <>
MouseSelActions = <>
Lines.Strings = (
''
)
VisibleSpecialChars = [vscSpace, vscTabAtLast]
ScrollBars = ssAutoBoth
BracketHighlightStyle = sbhsBoth
inline SynLeftGutterPartList1: TSynGutterPartList
object SynGutterMarks1: TSynGutterMarks
Width = 24
MouseActions = <>
end
object SynGutterLineNumber1: TSynGutterLineNumber
Width = 17
MouseActions = <>
MarkupInfo.Background = clBtnFace
MarkupInfo.Foreground = clNone
DigitCount = 2
ShowOnlyLineNumbersMultiplesOf = 1
ZeroStart = False
LeadingZeros = False
end
object SynGutterChanges1: TSynGutterChanges
Width = 4
MouseActions = <>
ModifiedColor = 59900
SavedColor = clGreen
end
object SynGutterSeparator1: TSynGutterSeparator
Width = 2
MouseActions = <>
end
object SynGutterCodeFolding1: TSynGutterCodeFolding
MouseActions = <>
MarkupInfo.Background = clNone
MarkupInfo.Foreground = clGray
MouseActionsExpanded = <>
MouseActionsCollapsed = <>
end
end
end
end
object ViewINI: TTabSheet
Caption = 'INI'
ClientHeight = 436
ClientWidth = 467
object edINI: TMemo
Left = 0
Height = 436
Top = 0
Width = 467
Align = alClient
Lines.Strings = (
''
)
ScrollBars = ssAutoBoth
TabOrder = 0
end
end
end
object StatusBar1: TStatusBar
Left = 0
Height = 23
Top = 464
Width = 569
Panels = <>
end
object MainMenu1: TMainMenu
left = 10
top = 10
object MenuItem1: TMenuItem
Caption = '&File'
object mnConfig: TMenuItem
Caption = '&Config'
OnClick = mnConfigClick
end
object MenuItem3: TMenuItem
Caption = '-'
end
object mnExit: TMenuItem
Caption = 'E&xit'
OnClick = mnExitClick
end
end
object mnPackage: TMenuItem
Caption = 'P&ackage'
object mnImportLpk: TMenuItem
Caption = 'Import...'
OnClick = mnImportLpkClick
end
end
end
object dlgSelRoot: TSelectDirectoryDialog
Title = 'Select Common Documentation Directory'
left = 16
top = 80
end
object SynXMLSyn1: TSynXMLSyn
DefaultFilter = 'XML Document (*.xml,*.xsd,*.xsl,*.xslt,*.dtd)|*.xml;*.xsd;*.xsl;*.xslt;*.dtd'
Enabled = False
ElementAttri.FrameEdges = sfeAround
AttributeAttri.FrameEdges = sfeAround
NamespaceAttributeAttri.FrameEdges = sfeAround
AttributeValueAttri.FrameEdges = sfeAround
NamespaceAttributeValueAttri.FrameEdges = sfeAround
TextAttri.FrameEdges = sfeAround
CDATAAttri.FrameEdges = sfeAround
EntityRefAttri.FrameEdges = sfeAround
ProcessingInstructionAttri.FrameEdges = sfeAround
CommentAttri.FrameEdges = sfeAround
DocTypeAttri.FrameEdges = sfeAround
SpaceAttri.FrameEdges = sfeAround
SymbolAttri.FrameEdges = sfeAround
WantBracesParsed = False
left = 24
top = 144
end
object dlgSelLpk: TOpenDialog
Title = 'Open Lazarus package file'
Filter = 'Lazarus Package|*.lpk|Lazarus Project|*.lpi|Both|*.lpi;*.lpk'
FilterIndex = 3
Options = [ofFileMustExist, ofEnableSizing, ofViewDetail]
left = 16
top = 200
end
end