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
|
object ReadIntForm: TReadIntForm
Left = 306
Height = 80
Top = 554
Width = 469
HorzScrollBar.Page = 468
VertScrollBar.Page = 79
ActiveControl = ReadIntEdit
BorderStyle = bsDialog
Caption = 'Integer required'
ClientHeight = 80
ClientWidth = 469
Constraints.MaxHeight = 80
Constraints.MaxWidth = 469
Constraints.MinHeight = 80
Constraints.MinWidth = 469
Font.Name = 'MS Sans Serif'
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '0.9.28.2'
object ReadIntLabel: TLabel
Left = 16
Height = 14
Top = 12
Width = 336
Alignment = taRightJustify
AutoSize = False
Caption = 'Enter a number'
ParentColor = False
end
object ReadIntEdit: TSpinEdit
Left = 360
Height = 27
Top = 12
Width = 93
MaxValue = 0
TabOrder = 0
end
object OKBtn: TButton
Left = 368
Height = 25
Top = 44
Width = 75
BorderSpacing.InnerBorder = 4
Caption = 'OK'
OnClick = OKBtnClick
TabOrder = 1
end
end
|