1object ViewUnitDialog: TViewUnitDialog
2  Left = 330
3  Height = 386
4  Top = 280
5  Width = 378
6  HorzScrollBar.Page = 377
7  HorzScrollBar.Range = 112
8  VertScrollBar.Page = 300
9  VertScrollBar.Range = 163
10  ActiveControl = FilterEdit
11  BorderIcons = [biSystemMenu]
12  Caption = 'View Project Units'
13  ClientHeight = 386
14  ClientWidth = 378
15  OnClose = FormClose
16  OnCreate = FormCreate
17  OnDestroy = FormDestroy
18  Position = poScreenCenter
19  LCLVersion = '1.7'
20  object Listbox: TListBox
21    Left = 6
22    Height = 272
23    Top = 41
24    Width = 366
25    Align = alClient
26    BorderSpacing.Around = 6
27    ClickOnSelChange = False
28    ItemHeight = 0
29    OnDblClick = OKButtonClick
30    OnDrawItem = ListboxDrawItem
31    OnKeyPress = ListboxKeyPress
32    OnMeasureItem = ListboxMeasureItem
33    PopupMenu = popListBox
34    Style = lbOwnerDrawFixed
35    TabOrder = 1
36  end
37  object ButtonPanel: TButtonPanel
38    Left = 6
39    Height = 35
40    Top = 345
41    Width = 366
42    OKButton.Name = 'OKButton'
43    OKButton.DefaultCaption = True
44    OKButton.OnClick = OKButtonClick
45    HelpButton.Name = 'HelpButton'
46    HelpButton.DefaultCaption = True
47    HelpButton.OnClick = HelpButtonClick
48    CloseButton.Name = 'CloseButton'
49    CloseButton.DefaultCaption = True
50    CloseButton.Enabled = False
51    CancelButton.Name = 'CancelButton'
52    CancelButton.DefaultCaption = True
53    CancelButton.OnClick = CancelButtonClick
54    TabOrder = 3
55    ShowButtons = [pbOK, pbCancel, pbHelp]
56  end
57  object BtnPanel: TPanel
58    Left = 6
59    Height = 29
60    Top = 6
61    Width = 366
62    Align = alTop
63    AutoSize = True
64    BorderSpacing.Around = 6
65    BevelOuter = bvNone
66    ClientHeight = 29
67    ClientWidth = 366
68    TabOrder = 0
69    object SortAlphabeticallySpeedButton: TSpeedButton
70      Left = 0
71      Height = 29
72      Top = 0
73      Width = 25
74      Align = alLeft
75      AllowAllUp = True
76      Constraints.MinHeight = 15
77      Constraints.MinWidth = 15
78      GroupIndex = 2
79      OnClick = SortAlphabeticallySpeedButtonClick
80      ShowHint = True
81      ParentShowHint = False
82    end
83    object FilterEdit: TListFilterEdit
84      Left = 31
85      Height = 29
86      Top = 0
87      Width = 335
88      ButtonWidth = 23
89      NumGlyphs = 1
90      Align = alClient
91      BorderSpacing.Left = 6
92      MaxLength = 0
93      ParentFont = False
94      TabOrder = 0
95      FilteredListbox = Listbox
96    end
97  end
98  object ProgressBar1: TProgressBar
99    Left = 6
100    Height = 20
101    Top = 319
102    Width = 366
103    Align = alBottom
104    BorderSpacing.Left = 6
105    BorderSpacing.Right = 6
106    TabOrder = 2
107    Visible = False
108  end
109  object popListBox: TPopupMenu
110    left = 144
111    top = 112
112    object mniMultiSelect: TMenuItem
113      AutoCheck = True
114      Caption = 'Multi Select'
115      OnClick = MultiselectCheckBoxClick
116    end
117  end
118end
119