PageRenderTime 28ms CodeModel.GetById 18ms app.highlight 4ms RepoModel.GetById 1ms app.codeStats 0ms

/ide/unitdependencies.lfm

http://github.com/graemeg/lazarus
Unknown | 416 lines | 416 code | 0 blank | 0 comment | 0 complexity | ef5199e9d06a4efbc705769740f58fc3 MD5 | raw file
  1object UnitDependenciesWindow: TUnitDependenciesWindow
  2  Left = 497
  3  Height = 440
  4  Top = 150
  5  Width = 620
  6  Caption = 'UnitDependenciesWindow'
  7  ClientHeight = 440
  8  ClientWidth = 620
  9  OnCreate = FormCreate
 10  OnDestroy = FormDestroy
 11  OnShow = FormShow
 12  LCLVersion = '1.5'
 13  object MainPageControl: TPageControl
 14    Left = 0
 15    Height = 407
 16    Top = 0
 17    Width = 620
 18    ActivePage = UnitsTabSheet
 19    Align = alClient
 20    TabIndex = 0
 21    TabOrder = 0
 22    object UnitsTabSheet: TTabSheet
 23      Caption = 'UnitsTabSheet'
 24      ClientHeight = 378
 25      ClientWidth = 616
 26      object ScopePanel: TPanel
 27        Left = 0
 28        Height = 57
 29        Top = 0
 30        Width = 616
 31        Align = alTop
 32        AutoSize = True
 33        BevelOuter = bvNone
 34        ClientHeight = 57
 35        ClientWidth = 616
 36        TabOrder = 0
 37        object SearchCustomFilesCheckBox: TCheckBox
 38          AnchorSideLeft.Control = ScopePanel
 39          AnchorSideTop.Control = SearchCustomFilesComboBox
 40          AnchorSideTop.Side = asrCenter
 41          Left = 2
 42          Height = 24
 43          Top = 3
 44          Width = 182
 45          BorderSpacing.Around = 2
 46          Caption = 'SearchCustomFilesCheckBox'
 47          OnChange = SearchCustomFilesCheckBoxChange
 48          ParentShowHint = False
 49          ShowHint = True
 50          TabOrder = 0
 51        end
 52        object SearchCustomFilesBrowseButton: TButton
 53          AnchorSideLeft.Side = asrBottom
 54          AnchorSideTop.Control = SearchCustomFilesComboBox
 55          AnchorSideTop.Side = asrCenter
 56          AnchorSideRight.Control = ScopePanel
 57          AnchorSideRight.Side = asrBottom
 58          Left = 563
 59          Height = 27
 60          Top = 2
 61          Width = 53
 62          Anchors = [akTop, akRight]
 63          AutoSize = True
 64          Caption = 'Browse'
 65          OnClick = SearchCustomFilesBrowseButtonClick
 66          TabOrder = 2
 67        end
 68        object SearchCustomFilesComboBox: TComboBox
 69          AnchorSideLeft.Control = SearchCustomFilesCheckBox
 70          AnchorSideLeft.Side = asrBottom
 71          AnchorSideTop.Control = ScopePanel
 72          AnchorSideRight.Control = SearchCustomFilesBrowseButton
 73          Left = 186
 74          Height = 27
 75          Top = 2
 76          Width = 375
 77          Anchors = [akTop, akLeft, akRight]
 78          BorderSpacing.Around = 2
 79          ItemHeight = 0
 80          OnChange = SearchCustomFilesComboBoxChange
 81          TabOrder = 1
 82          Text = 'SearchCustomFilesComboBox'
 83        end
 84        object SearchPkgsCheckBox: TCheckBox
 85          AnchorSideLeft.Control = ScopePanel
 86          AnchorSideTop.Control = SearchCustomFilesComboBox
 87          AnchorSideTop.Side = asrBottom
 88          Left = 2
 89          Height = 24
 90          Top = 31
 91          Width = 142
 92          BorderSpacing.Around = 2
 93          Caption = 'SearchPkgsCheckBox'
 94          OnChange = SearchPkgsCheckBoxChange
 95          TabOrder = 3
 96        end
 97        object SearchSrcEditCheckBox: TCheckBox
 98          AnchorSideLeft.Control = SearchPkgsCheckBox
 99          AnchorSideLeft.Side = asrBottom
100          AnchorSideTop.Control = SearchPkgsCheckBox
101          AnchorSideTop.Side = asrCenter
102          Left = 161
103          Height = 24
104          Top = 31
105          Width = 156
106          BorderSpacing.Left = 15
107          BorderSpacing.Around = 2
108          Caption = 'SearchSrcEditCheckBox'
109          Checked = True
110          OnChange = SearchSrcEditCheckBoxChange
111          State = cbChecked
112          TabOrder = 4
113        end
114      end
115      object AllUnitsGroupBox: TGroupBox
116        Left = 0
117        Height = 321
118        Top = 57
119        Width = 248
120        Align = alLeft
121        Caption = 'AllUnitsGroupBox'
122        ClientHeight = 304
123        ClientWidth = 244
124        TabOrder = 1
125        object AllUnitsShowGroupNodesSpeedButton: TSpeedButton
126          AnchorSideLeft.Side = asrBottom
127          AnchorSideTop.Control = AllUnitsFilterEdit
128          AnchorSideTop.Side = asrCenter
129          AnchorSideRight.Control = AllUnitsShowDirsSpeedButton
130          Left = 198
131          Height = 22
132          Top = 1
133          Width = 23
134          AllowAllUp = True
135          Anchors = [akTop, akRight]
136          GroupIndex = 12
137          OnClick = AllUnitsShowGroupNodesSpeedButtonClick
138          ShowHint = True
139          ParentShowHint = False
140        end
141        object AllUnitsShowDirsSpeedButton: TSpeedButton
142          AnchorSideLeft.Side = asrBottom
143          AnchorSideTop.Control = AllUnitsFilterEdit
144          AnchorSideTop.Side = asrCenter
145          AnchorSideRight.Control = AllUnitsGroupBox
146          AnchorSideRight.Side = asrBottom
147          Left = 221
148          Height = 22
149          Top = 1
150          Width = 23
151          AllowAllUp = True
152          Anchors = [akTop, akRight]
153          GroupIndex = 13
154          OnClick = AllUnitsShowDirsSpeedButtonClick
155          ShowHint = True
156          ParentShowHint = False
157        end
158        object AllUnitsFilterEdit: TEdit
159          AnchorSideLeft.Control = AllUnitsGroupBox
160          AnchorSideTop.Control = AllUnitsGroupBox
161          AnchorSideRight.Control = AllUnitsShowGroupNodesSpeedButton
162          Left = 0
163          Height = 25
164          Top = 0
165          Width = 198
166          Anchors = [akTop, akLeft, akRight]
167          OnChange = AllUnitsFilterEditChange
168          TabOrder = 0
169        end
170        object AllUnitsSearchNextSpeedButton: TSpeedButton
171          AnchorSideTop.Control = AllUnitsSearchEdit
172          AnchorSideTop.Side = asrCenter
173          AnchorSideRight.Control = AllUnitsSearchPrevSpeedButton
174          Left = 198
175          Height = 22
176          Top = 280
177          Width = 23
178          Anchors = [akTop, akRight]
179          OnClick = AllUnitsSearchNextSpeedButtonClick
180          ShowHint = True
181          ParentShowHint = False
182        end
183        object AllUnitsSearchPrevSpeedButton: TSpeedButton
184          AnchorSideTop.Control = AllUnitsSearchEdit
185          AnchorSideTop.Side = asrCenter
186          AnchorSideRight.Control = AllUnitsGroupBox
187          AnchorSideRight.Side = asrBottom
188          Left = 221
189          Height = 22
190          Top = 280
191          Width = 23
192          Anchors = [akTop, akRight]
193          OnClick = AllUnitsSearchPrevSpeedButtonClick
194          ShowHint = True
195          ParentShowHint = False
196        end
197        object AllUnitsTreeView: TTreeView
198          AnchorSideLeft.Control = AllUnitsGroupBox
199          AnchorSideTop.Control = AllUnitsFilterEdit
200          AnchorSideTop.Side = asrBottom
201          AnchorSideRight.Control = AllUnitsGroupBox
202          AnchorSideRight.Side = asrBottom
203          AnchorSideBottom.Control = AllUnitsSearchEdit
204          Left = 0
205          Height = 254
206          Top = 25
207          Width = 244
208          Anchors = [akTop, akLeft, akRight, akBottom]
209          DefaultItemHeight = 18
210          HotTrack = True
211          MultiSelect = True
212          ParentShowHint = False
213          PopupMenu = UnitsTVPopupMenu
214          ReadOnly = True
215          RightClickSelect = True
216          ShowHint = True
217          ShowRoot = False
218          TabOrder = 1
219          OnMouseDown = UnitsTreeViewMouseDown
220          OnSelectionChanged = AllUnitsTreeViewSelectionChanged
221          OnShowHint = UnitsTreeViewShowHint
222          Options = [tvoAllowMultiselect, tvoAutoItemHeight, tvoHideSelection, tvoHotTrack, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoToolTips, tvoThemedDraw]
223        end
224        object AllUnitsSearchEdit: TEdit
225          AnchorSideLeft.Control = AllUnitsGroupBox
226          AnchorSideRight.Control = AllUnitsSearchNextSpeedButton
227          AnchorSideBottom.Control = AllUnitsGroupBox
228          AnchorSideBottom.Side = asrBottom
229          Left = 0
230          Height = 25
231          Top = 279
232          Width = 198
233          Anchors = [akLeft, akRight, akBottom]
234          OnChange = AllUnitsSearchEditChange
235          TabOrder = 2
236        end
237      end
238      object UnitsSplitter: TSplitter
239        Left = 248
240        Height = 321
241        Top = 57
242        Width = 5
243      end
244      object SelectedUnitsGroupBox: TGroupBox
245        Left = 253
246        Height = 321
247        Top = 57
248        Width = 363
249        Align = alClient
250        Caption = 'SelectedUnitsGroupBox'
251        ClientHeight = 304
252        ClientWidth = 359
253        TabOrder = 3
254        object SelUnitsSearchNextSpeedButton: TSpeedButton
255          AnchorSideTop.Control = SelUnitsSearchEdit
256          AnchorSideTop.Side = asrCenter
257          AnchorSideRight.Control = SelUnitsSearchPrevSpeedButton
258          Left = 313
259          Height = 22
260          Top = 280
261          Width = 23
262          Anchors = [akTop, akRight]
263          OnClick = SelUnitsSearchNextSpeedButtonClick
264          ShowHint = True
265          ParentShowHint = False
266        end
267        object SelUnitsSearchPrevSpeedButton: TSpeedButton
268          AnchorSideTop.Control = SelUnitsSearchEdit
269          AnchorSideTop.Side = asrCenter
270          AnchorSideRight.Control = SelectedUnitsGroupBox
271          AnchorSideRight.Side = asrBottom
272          Left = 336
273          Height = 22
274          Top = 280
275          Width = 23
276          Anchors = [akTop, akRight]
277          OnClick = SelUnitsSearchPrevSpeedButtonClick
278          ShowHint = True
279          ParentShowHint = False
280        end
281        object SelUnitsSearchEdit: TEdit
282          AnchorSideLeft.Control = SelectedUnitsGroupBox
283          AnchorSideRight.Control = SelUnitsSearchNextSpeedButton
284          AnchorSideBottom.Control = SelectedUnitsGroupBox
285          AnchorSideBottom.Side = asrBottom
286          Left = 0
287          Height = 25
288          Top = 279
289          Width = 313
290          Anchors = [akLeft, akRight, akBottom]
291          OnChange = SelUnitsSearchEditChange
292          TabOrder = 1
293        end
294        object SelUnitsTreeView: TTreeView
295          AnchorSideLeft.Control = SelectedUnitsGroupBox
296          AnchorSideTop.Control = SelectedUnitsGroupBox
297          AnchorSideRight.Control = SelectedUnitsGroupBox
298          AnchorSideRight.Side = asrBottom
299          AnchorSideBottom.Control = SelUnitsSearchEdit
300          Left = 0
301          Height = 279
302          Top = 0
303          Width = 359
304          Anchors = [akTop, akLeft, akRight, akBottom]
305          DefaultItemHeight = 18
306          HotTrack = True
307          ParentShowHint = False
308          PopupMenu = UnitsTVPopupMenu
309          ReadOnly = True
310          RightClickSelect = True
311          ShowHint = True
312          ShowRoot = False
313          TabOrder = 0
314          OnExpanding = SelUnitsTreeViewExpanding
315          OnMouseDown = UnitsTreeViewMouseDown
316          OnShowHint = UnitsTreeViewShowHint
317          Options = [tvoAutoItemHeight, tvoHideSelection, tvoHotTrack, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoToolTips, tvoThemedDraw]
318        end
319      end
320    end
321    object GroupsTabSheet: TTabSheet
322      Caption = 'GroupsTabSheet'
323      ClientHeight = 378
324      ClientWidth = 616
325      object GroupsSplitter: TSplitter
326        Cursor = crVSplit
327        Left = 0
328        Height = 5
329        Top = 0
330        Width = 665
331        Align = alTop
332        ResizeAnchor = akTop
333      end
334    end
335  end
336  object StatusPanel: TPanel
337    Left = 0
338    Height = 33
339    Top = 407
340    Width = 620
341    Align = alBottom
342    AutoSize = True
343    ClientHeight = 33
344    ClientWidth = 620
345    TabOrder = 1
346    object ProgressBar1: TProgressBar
347      AnchorSideLeft.Control = StatsLabel
348      AnchorSideLeft.Side = asrBottom
349      AnchorSideTop.Control = RefreshButton
350      AnchorSideTop.Side = asrCenter
351      AnchorSideRight.Control = RefreshButton
352      AnchorSideBottom.Side = asrBottom
353      Left = 69
354      Height = 20
355      Top = 6
356      Width = 451
357      Anchors = [akTop, akLeft, akRight]
358      TabOrder = 0
359    end
360    object RefreshButton: TButton
361      Left = 522
362      Height = 27
363      Top = 3
364      Width = 95
365      Align = alRight
366      AutoSize = True
367      BorderSpacing.Around = 2
368      Caption = 'RefreshButton'
369      OnClick = RefreshButtonClick
370      TabOrder = 1
371    end
372    object StatsLabel: TLabel
373      AnchorSideLeft.Control = StatusPanel
374      AnchorSideTop.Control = RefreshButton
375      AnchorSideTop.Side = asrCenter
376      Left = 7
377      Height = 15
378      Top = 9
379      Width = 56
380      BorderSpacing.Left = 6
381      BorderSpacing.Right = 6
382      Caption = 'StatsLabel'
383      ParentColor = False
384    end
385  end
386  object UnitsTVPopupMenu: TPopupMenu
387    OnPopup = UnitsTVPopupMenuPopup
388    left = 120
389    top = 193
390    object UnitsTVCopyFilenameMenuItem: TMenuItem
391      Caption = 'UnitsTVCopyFilenameMenuItem'
392      OnClick = UnitsTVCopyFilenameMenuItemClick
393    end
394    object UnitsTVOpenFileMenuItem: TMenuItem
395      Caption = 'UnitsTVOpenFileMenuItem'
396      OnClick = UnitsTVOpenFileMenuItemClick
397    end
398    object UnitsTVUnusedUnitsMenuItem: TMenuItem
399      Caption = 'UnitsTVUnusedUnitsMenuItem'
400      OnClick = UnitsTVUnusedUnitsMenuItemClick
401    end
402    object UnitsTVExpandAllMenuItem: TMenuItem
403      Caption = 'UnitsTVExpandAllMenuItem'
404      OnClick = UnitsTVExpandAllMenuItemClick
405    end
406    object UnitsTVCollapseAllMenuItem: TMenuItem
407      Caption = 'UnitsTVCollapseAllMenuItem'
408      OnClick = UnitsTVCollapseAllMenuItemClick
409    end
410  end
411  object Timer1: TTimer
412    OnTimer = Timer1Timer
413    left = 465
414    top = 175
415  end
416end