PageRenderTime 31ms CodeModel.GetById 12ms app.highlight 9ms RepoModel.GetById 2ms app.codeStats 0ms

/ide/fpdoceditwindow.lfm

http://github.com/graemeg/lazarus
Unknown | 564 lines | 564 code | 0 blank | 0 comment | 0 complexity | 5b2953c7d9e4f442f0a9f8522ab79fc2 MD5 | raw file
  1object FPDocEditor: TFPDocEditor
  2  Left = 327
  3  Height = 156
  4  Top = 397
  5  Width = 753
  6  ActiveControl = PageControl
  7  Caption = 'FPDoc editor'
  8  ClientHeight = 156
  9  ClientWidth = 753
 10  KeyPreview = True
 11  OnCreate = FormCreate
 12  OnDestroy = FormDestroy
 13  OnKeyDown = FormKeyDown
 14  OnShow = FormShow
 15  LCLVersion = '1.1'
 16  object PageControl: TPageControl
 17    Left = 33
 18    Height = 156
 19    Top = 0
 20    Width = 720
 21    ActivePage = SeeAlsoTabSheet
 22    Align = alClient
 23    TabIndex = 4
 24    TabOrder = 0
 25    TabPosition = tpBottom
 26    OnChange = PageControlChange
 27    object ShortTabSheet: TTabSheet
 28      Caption = 'ShortTabSheet'
 29      ClientHeight = 117
 30      ClientWidth = 714
 31      object LinkLabel: TLabel
 32        AnchorSideTop.Control = LinkEdit
 33        AnchorSideTop.Side = asrCenter
 34        Left = 6
 35        Height = 16
 36        Top = 27
 37        Width = 60
 38        BorderSpacing.Top = 6
 39        Caption = 'LinkLabel'
 40        ParentColor = False
 41      end
 42      object ShortLabel: TLabel
 43        AnchorSideLeft.Control = ShortTabSheet
 44        AnchorSideTop.Control = ShortEdit
 45        AnchorSideTop.Side = asrCenter
 46        Left = 6
 47        Height = 16
 48        Top = 3
 49        Width = 67
 50        BorderSpacing.Left = 6
 51        Caption = 'ShortLabel'
 52        ParentColor = False
 53      end
 54      object ShortEdit: TEdit
 55        AnchorSideLeft.Control = ShortLabel
 56        AnchorSideLeft.Side = asrBottom
 57        AnchorSideRight.Control = ShortTabSheet
 58        AnchorSideRight.Side = asrBottom
 59        Left = 79
 60        Height = 22
 61        Top = 0
 62        Width = 633
 63        Anchors = [akTop, akLeft, akRight]
 64        AutoSelect = False
 65        BorderSpacing.Left = 6
 66        BorderSpacing.Right = 2
 67        OnChange = ShortEditChange
 68        OnEditingDone = ShortEditEditingDone
 69        TabOrder = 0
 70        Text = 'ShortEdit'
 71      end
 72      object CreateButton: TButton
 73        AnchorSideTop.Control = LinkEdit
 74        AnchorSideTop.Side = asrBottom
 75        Left = 6
 76        Height = 20
 77        Top = 52
 78        Width = 107
 79        AutoSize = True
 80        BorderSpacing.Around = 6
 81        Caption = 'CreateButton'
 82        OnClick = CreateButtonClick
 83        TabOrder = 1
 84      end
 85      object LinkEdit: TEdit
 86        AnchorSideLeft.Control = LinkLabel
 87        AnchorSideLeft.Side = asrBottom
 88        AnchorSideTop.Control = ShortEdit
 89        AnchorSideTop.Side = asrBottom
 90        AnchorSideRight.Control = ShortTabSheet
 91        AnchorSideRight.Side = asrBottom
 92        Left = 72
 93        Height = 22
 94        Top = 24
 95        Width = 640
 96        Anchors = [akTop, akLeft, akRight]
 97        AutoSelect = False
 98        BorderSpacing.Left = 6
 99        BorderSpacing.Top = 2
100        BorderSpacing.Right = 2
101        OnChange = LinkEditChange
102        OnEditingDone = LinkEditEditingDone
103        TabOrder = 2
104        Text = 'LinkEdit'
105      end
106      object OpenXMLButton: TButton
107        AnchorSideTop.Control = CreateButton
108        AnchorSideRight.Control = ShortTabSheet
109        AnchorSideRight.Side = asrBottom
110        Left = 588
111        Height = 20
112        Top = 52
113        Width = 126
114        Anchors = [akTop, akRight]
115        AutoSize = True
116        Caption = 'OpenXMLButton'
117        OnClick = OpenXMLButtonClick
118        ParentShowHint = False
119        ShowHint = True
120        TabOrder = 3
121      end
122    end
123    object InheritedTabSheet: TTabSheet
124      Caption = 'InheritedTabSheet'
125      ClientHeight = 117
126      ClientWidth = 714
127      object InheritedShortLabel: TLabel
128        Left = 0
129        Height = 16
130        Top = 2
131        Width = 714
132        Align = alTop
133        BorderSpacing.Top = 2
134        Caption = 'InheritedShortLabel'
135        ParentColor = False
136      end
137      object InheritedShortEdit: TEdit
138        AnchorSideLeft.Control = InheritedTabSheet
139        AnchorSideTop.Control = InheritedShortLabel
140        AnchorSideTop.Side = asrBottom
141        AnchorSideRight.Control = InheritedTabSheet
142        AnchorSideRight.Side = asrBottom
143        Left = 0
144        Height = 22
145        Top = 20
146        Width = 714
147        Anchors = [akTop, akLeft, akRight]
148        BorderSpacing.Top = 2
149        ReadOnly = True
150        TabOrder = 0
151        Text = 'InheritedShortEdit'
152      end
153      object MoveToInheritedButton: TButton
154        AnchorSideTop.Control = InheritedShortEdit
155        AnchorSideTop.Side = asrBottom
156        Left = 0
157        Height = 20
158        Top = 48
159        Width = 176
160        AutoSize = True
161        BorderSpacing.Around = 6
162        Caption = 'MoveToInheritedButton'
163        OnClick = MoveToInheritedButtonClick
164        TabOrder = 1
165      end
166      object CopyFromInheritedButton: TButton
167        AnchorSideLeft.Control = MoveToInheritedButton
168        AnchorSideLeft.Side = asrBottom
169        AnchorSideTop.Control = MoveToInheritedButton
170        AnchorSideTop.Side = asrCenter
171        Left = 186
172        Height = 20
173        Top = 48
174        Width = 191
175        AutoSize = True
176        BorderSpacing.Left = 10
177        Caption = 'CopyFromInheritedButton'
178        OnClick = CopyFromInheritedButtonClick
179        TabOrder = 2
180      end
181      object AddLinkToInheritedButton: TButton
182        AnchorSideLeft.Control = CopyFromInheritedButton
183        AnchorSideLeft.Side = asrBottom
184        AnchorSideTop.Control = CopyFromInheritedButton
185        Left = 387
186        Height = 20
187        Top = 48
188        Width = 194
189        AutoSize = True
190        BorderSpacing.Left = 10
191        Caption = 'AddLinkToInheritedButton'
192        OnClick = AddLinkToInheritedButtonClick
193        TabOrder = 3
194      end
195    end
196    object DescrTabSheet: TTabSheet
197      Caption = 'DescrTabSheet'
198      ClientHeight = 117
199      ClientWidth = 714
200      object DescrMemo: TMemo
201        Left = 0
202        Height = 89
203        Top = 24
204        Width = 712
205        Align = alClient
206        BorderSpacing.Right = 2
207        BorderSpacing.Bottom = 4
208        Lines.Strings = (
209          'DescrMemo'
210        )
211        OnChange = DescrMemoChange
212        OnEditingDone = DescrMemoEditingDone
213        ScrollBars = ssAutoBoth
214        TabOrder = 0
215      end
216      object ShortPanel: TPanel
217        Left = 0
218        Height = 24
219        Top = 0
220        Width = 714
221        Align = alTop
222        Alignment = taLeftJustify
223        AutoSize = True
224        Caption = 'Short'
225        ClientHeight = 24
226        ClientWidth = 714
227        TabOrder = 1
228        object DescrShortEdit: TEdit
229          AnchorSideLeft.Control = ShortPanel
230          AnchorSideRight.Side = asrBottom
231          Left = 61
232          Height = 22
233          Top = 1
234          Width = 650
235          Align = alRight
236          Anchors = [akTop, akLeft, akRight, akBottom]
237          AutoSelect = False
238          BorderSpacing.Left = 60
239          BorderSpacing.Right = 2
240          OnChange = ShortEditChange
241          OnEditingDone = ShortEditEditingDone
242          ReadOnly = True
243          TabOrder = 0
244          Text = 'DescrShortEdit'
245        end
246      end
247    end
248    object ErrorsTabSheet: TTabSheet
249      Caption = 'ErrorsTabSheet'
250      ClientHeight = 117
251      ClientWidth = 714
252      object ErrorsMemo: TMemo
253        Left = 0
254        Height = 113
255        Top = 0
256        Width = 712
257        Align = alClient
258        BorderSpacing.Right = 2
259        BorderSpacing.Bottom = 4
260        Lines.Strings = (
261          'ErrorsMemo'
262        )
263        OnChange = ErrorsMemoChange
264        OnEditingDone = ErrorsMemoEditingDone
265        ScrollBars = ssAutoBoth
266        TabOrder = 0
267      end
268    end
269    object SeeAlsoTabSheet: TTabSheet
270      Caption = 'SeeAlsoTabSheet'
271      ClientHeight = 117
272      ClientWidth = 714
273      object SeeAlsoMemo: TMemo
274        Left = 0
275        Height = 117
276        Top = 0
277        Width = 714
278        Align = alClient
279        Lines.Strings = (
280          'SeeAlsoMemo'
281        )
282        OnChange = SeeAlsoMemoChange
283        OnEditingDone = SeeAlsoMemoEditingDone
284        ScrollBars = ssAutoBoth
285        TabOrder = 0
286      end
287    end
288    object ExampleTabSheet: TTabSheet
289      Caption = 'ExampleTabSheet'
290      ClientHeight = 122
291      ClientWidth = 687
292      object ExampleEdit: TEdit
293        Left = 0
294        Height = 21
295        Top = 0
296        Width = 686
297        Align = alTop
298        AutoSelect = False
299        BorderSpacing.Right = 2
300        OnChange = ExampleEditChange
301        OnEditingDone = ExampleEditEditingDone
302        TabOrder = 0
303        Text = 'ExampleEdit'
304      end
305      object BrowseExampleButton: TButton
306        AnchorSideTop.Control = ExampleEdit
307        AnchorSideTop.Side = asrBottom
308        AnchorSideRight.Control = ExampleTabSheet
309        AnchorSideRight.Side = asrBottom
310        Left = 549
311        Height = 23
312        Top = 27
313        Width = 133
314        Anchors = [akTop, akRight]
315        AutoSize = True
316        BorderSpacing.Around = 6
317        Caption = 'BrowseExampleButton'
318        OnClick = BrowseExampleButtonClick
319        TabOrder = 1
320      end
321    end
322    object TopicSheet: TTabSheet
323      Caption = 'Topics'
324      ClientHeight = 122
325      ClientWidth = 687
326      object Panel1: TPanel
327        Left = 518
328        Height = 99
329        Top = 0
330        Width = 170
331        Align = alRight
332        BorderSpacing.Left = 5
333        BevelOuter = bvNone
334        ClientHeight = 99
335        ClientWidth = 170
336        TabOrder = 0
337        object Panel2: TPanel
338          Left = 0
339          Height = 25
340          Top = 0
341          Width = 170
342          Align = alTop
343          AutoSize = True
344          BevelOuter = bvNone
345          ClientHeight = 25
346          ClientWidth = 170
347          TabOrder = 0
348          object NewTopicButton: TButton
349            Left = 100
350            Height = 25
351            Top = 0
352            Width = 70
353            Align = alRight
354            AutoSize = True
355            Caption = 'New'
356            OnClick = NewTopicButtonClick
357            TabOrder = 0
358          end
359          object NewTopicNameEdit: TEdit
360            Left = 0
361            Height = 25
362            Top = 0
363            Width = 95
364            Align = alClient
365            BorderSpacing.Right = 5
366            OnEnter = TopicControlEnter
367            TabOrder = 1
368          end
369        end
370        object TopicListBox: TListBox
371          Left = 0
372          Height = 69
373          Top = 30
374          Width = 170
375          Align = alClient
376          BorderSpacing.Top = 5
377          ItemHeight = 0
378          OnClick = TopicListBoxClick
379          OnEnter = TopicControlEnter
380          TabOrder = 1
381        end
382      end
383      object Panel3: TPanel
384        Left = 0
385        Height = 99
386        Top = 0
387        Width = 513
388        Align = alClient
389        BevelOuter = bvNone
390        ClientHeight = 99
391        ClientWidth = 513
392        TabOrder = 1
393        object TopicShort: TEdit
394          Left = 0
395          Height = 22
396          Top = 0
397          Width = 513
398          Align = alTop
399          AutoSelect = False
400          OnChange = TopicDescrChange
401          OnEnter = TopicControlEnter
402          TabOrder = 0
403        end
404        object TopicDescr: TMemo
405          Left = 0
406          Height = 72
407          Top = 27
408          Width = 513
409          Align = alClient
410          BorderSpacing.Top = 5
411          OnChange = TopicDescrChange
412          OnEnter = TopicControlEnter
413          TabOrder = 1
414        end
415      end
416    end
417  end
418  object LeftBtnPanel: TPanel
419    Left = 0
420    Height = 156
421    Top = 0
422    Width = 33
423    Align = alLeft
424    AutoSize = True
425    BevelOuter = bvNone
426    ChildSizing.Layout = cclLeftToRightThenTopToBottom
427    ChildSizing.ControlsPerLine = 3
428    ClientHeight = 156
429    ClientWidth = 33
430    FullRepaint = False
431    ParentShowHint = False
432    ShowHint = True
433    TabOrder = 1
434    object BoldFormatButton: TSpeedButton
435      Left = 0
436      Height = 4
437      Top = 0
438      Width = 4
439      Constraints.MaxHeight = 23
440      Constraints.MaxWidth = 20
441      OnClick = FormatButtonClick
442    end
443    object ItalicFormatButton: TSpeedButton
444      Tag = 1
445      Left = 4
446      Height = 4
447      Top = 0
448      Width = 11
449      Constraints.MaxHeight = 23
450      Constraints.MaxWidth = 20
451      OnClick = FormatButtonClick
452    end
453    object UnderlineFormatButton: TSpeedButton
454      Tag = 2
455      Left = 15
456      Height = 4
457      Top = 0
458      Width = 18
459      Constraints.MaxHeight = 23
460      Constraints.MaxWidth = 20
461      OnClick = FormatButtonClick
462    end
463    object InsertVarTagButton: TSpeedButton
464      Tag = 5
465      Left = 0
466      Height = 20
467      Top = 4
468      Width = 4
469      Constraints.MaxHeight = 23
470      Constraints.MaxWidth = 20
471      OnClick = FormatButtonClick
472    end
473    object InsertParagraphSpeedButton: TSpeedButton
474      Tag = 6
475      Left = 4
476      Height = 20
477      Top = 4
478      Width = 11
479      Constraints.MaxHeight = 23
480      Constraints.MaxWidth = 20
481      Caption = 'P'
482      OnClick = FormatButtonClick
483    end
484    object InsertLinkSpeedButton: TSpeedButton
485      Left = 15
486      Height = 20
487      Top = 4
488      Width = 18
489      Constraints.MaxHeight = 23
490      Constraints.MaxWidth = 20
491      Caption = 'Li'
492      Enabled = False
493      OnClick = InsertLinkSpeedButtonClick
494      ShowHint = True
495      ParentShowHint = False
496    end
497    object InsertCodeTagButton: TSpeedButton
498      Tag = 3
499      Left = 0
500      Height = 20
501      Top = 24
502      Width = 4
503      Constraints.MaxHeight = 23
504      Constraints.MaxWidth = 20
505      OnClick = FormatButtonClick
506      ShowHint = True
507      ParentShowHint = False
508    end
509    object InsertRemarkButton: TSpeedButton
510      Tag = 4
511      Left = 4
512      Height = 20
513      Top = 24
514      Width = 11
515      Constraints.MaxHeight = 23
516      Constraints.MaxWidth = 20
517      OnClick = FormatButtonClick
518      ShowHint = True
519      ParentShowHint = False
520    end
521    object InsertPrintShortSpeedButton: TSpeedButton
522      Tag = 7
523      Left = 15
524      Height = 20
525      Top = 24
526      Width = 18
527      Constraints.MaxHeight = 23
528      Constraints.MaxWidth = 20
529      Caption = 'PS'
530      OnClick = FormatButtonClick
531      ShowHint = True
532      ParentShowHint = False
533    end
534    object InsertURLTagSpeedButton: TSpeedButton
535      Tag = 8
536      Left = 0
537      Height = 4
538      Top = 44
539      Width = 4
540      Constraints.MaxHeight = 23
541      Constraints.MaxWidth = 20
542      OnClick = FormatButtonClick
543      ShowHint = True
544      ParentShowHint = False
545    end
546    object SaveButton: TSpeedButton
547      AnchorSideLeft.Side = asrBottom
548      Left = 0
549      Height = 29
550      Top = 127
551      Width = 33
552      Align = alBottom
553      Caption = 'Save'
554      OnClick = SaveButtonClick
555    end
556  end
557  object OpenDialog: TOpenDialog
558    Title = 'Open example file'
559    Filter = 'pascal file|*.pas; *.pp; *.p'
560    FilterIndex = 0
561    left = 240
562    top = 16
563  end
564end