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
|
object Form1: TForm1
Caption = 'Form1'
ClientHeight = 306
ClientWidth = 350
OnCreate = Form1Create
OnDestroy = Form1Destroy
PixelsPerInch = 75
HorzScrollBar.Page = 349
VertScrollBar.Page = 305
Left = 273
Height = 306
Top = 181
Width = 350
object GroupBox1: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'MyString'
ClientHeight = 31
ClientWidth = 299
ParentColor = True
TabOrder = 0
Left = 24
Height = 48
Top = 16
Width = 303
object TIEdit1: TTIEdit
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
BorderSpacing.Right = 9
TabStop = True
TabOrder = 0
AnchorSideRight.Control = GroupBox1
AnchorSideRight.Side = asrBottom
Left = 6
Height = 23
Top = 1
Width = 284
end
end
object TIRadioGroup1: TTIRadioGroup
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'MyEnum'
Columns = 3
ParentColor = True
Left = 25
Height = 57
Top = 72
Width = 302
end
object GroupBox2: TGroupBox
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
Caption = 'MyRange'
ClientHeight = 24
ClientWidth = 298
ParentColor = True
TabOrder = 2
Left = 25
Height = 41
Top = 144
Width = 302
object TITrackBar1: TTITrackBar
Anchors = [akTop, akLeft, akRight]
BorderSpacing.OnChange = nil
BorderSpacing.Right = 9
ScalePos = trTop
TabOrder = 0
TabStop = True
ScalePos = trTop
AnchorSideRight.Control = GroupBox2
AnchorSideRight.Side = asrBottom
Left = 15
Height = 20
Top = 1
Width = 274
end
end
object Memo1: TMemo
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.OnChange = nil
ScrollBars = ssAutoBoth
TabOrder = 3
Left = 27
Height = 95
Top = 200
Width = 300
end
end
|
