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
|
object IntfPackageListFrm: TIntfPackageListFrm
Left = 613
Height = 453
Top = 269
Width = 688
BorderIcons = [biSystemMenu]
Caption = 'Package list'
ClientHeight = 453
ClientWidth = 688
OnCreate = FormCreate
OnDestroy = FormDestroy
Position = poDefault
LCLVersion = '2.1.0.0'
object ButtonPanel1: TButtonPanel
Left = 6
Height = 26
Top = 421
Width = 676
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
ButtonOrder = boCloseOKCancel
TabOrder = 0
ShowButtons = [pbOK, pbCancel]
ShowBevel = False
end
object pnInfo: TPanel
Left = 0
Height = 27
Top = 0
Width = 688
Align = alTop
Alignment = taLeftJustify
BevelOuter = bvNone
ClientHeight = 27
ClientWidth = 688
ParentColor = False
TabOrder = 1
object pnExpCol: TPanel
Left = 634
Height = 27
Top = 0
Width = 54
Align = alRight
BevelOuter = bvNone
ClientHeight = 27
ClientWidth = 54
TabOrder = 0
object spExpand: TSpeedButton
Tag = 1
Left = 4
Height = 20
Top = 4
Width = 21
Anchors = [akRight, akBottom]
Caption = '+'
Flat = True
ImageIndex = 0
OnClick = spExpandClick
ShowHint = True
ParentShowHint = False
end
object spCollapse: TSpeedButton
Tag = 2
Left = 28
Height = 20
Top = 4
Width = 21
Anchors = [akRight, akBottom]
Caption = '-'
Flat = True
ImageIndex = 1
OnClick = spCollapseClick
ShowHint = True
ParentShowHint = False
end
end
end
end
|
