1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
object OpenLoadedPackagesDlg: TOpenLoadedPackagesDlg
Left = 407
Height = 501
Top = 151
Width = 446
Caption = 'OpenLoadedPackagesDlg'
ClientHeight = 501
ClientWidth = 446
OnClose = FormClose
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '1.7'
object HintMemo: TMemo
Left = 3
Height = 121
Top = 333
Width = 440
Align = alBottom
BorderSpacing.Left = 3
BorderSpacing.Right = 3
Lines.Strings = (
'Memo1'
)
ReadOnly = True
ScrollBars = ssAutoBoth
TabOrder = 3
end
object PkgListView: TListView
AnchorSideTop.Control = FilterEdit
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Splitter1
Left = 3
Height = 294
Top = 34
Width = 440
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 3
BorderSpacing.Top = 3
BorderSpacing.Right = 3
Columns = <>
HideSelection = False
ReadOnly = True
RowSelect = True
SortType = stText
TabOrder = 1
ViewStyle = vsReport
OnDblClick = PkgListViewDblClick
OnKeyPress = PkgListViewKeyPress
OnSelectItem = PkgListViewSelectItem
end
object Splitter1: TSplitter
Cursor = crVSplit
Left = 0
Height = 5
Top = 328
Width = 446
Align = alBottom
ResizeAnchor = akBottom
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 35
Top = 460
Width = 434
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
OKButton.OnClick = OpenButtonClick
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
HelpButton.OnClick = HelpButtonClick
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 4
ShowButtons = [pbOK, pbCancel, pbHelp]
end
object FilterEdit: TListViewFilterEdit
Left = 3
Height = 28
Top = 3
Width = 147
ButtonWidth = 23
NumGlyphs = 1
MaxLength = 0
TabOrder = 0
FilteredListview = PkgListView
end
end
|
