blob: 51c2b888df80ce52446b487bce1fa64eea36ef3b (
plain)
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
|
object EditForm: TEditForm
BorderWidth = 8
Text = 'Edit field test'
object Grid: TGridLayout
ColCount = 3
RowCount = 4
GridPositions = <
item
Widget = Label1
end
item
x = 1
Widget = Edit1
end
item
x = 2
Widget = GrayCheckBox1
end
item
y = 1
width = 3
Widget = Separator
end
item
y = 2
Widget = Label2
end
item
x = 1
y = 2
Widget = Edit2
end
item
x = 2
y = 2
Widget = GrayCheckBox2
end
item
x = 1
y = 3
Widget = PasswordDisplay
end>
object Label1: TLabel
Text = 'Normal edit field:'
CanExpandWidth = False
end
object Edit1: TEdit
Text = 'Edit1'
end
object GrayCheckBox1: TCheckBox
Text = 'Disabled'
OnClick = GrayCheckBox1Click
end
object Separator: TSeparator
end
object Label2: TLabel
Text = 'Password edit field:'
CanExpandWidth = False
end
object Edit2: TEdit
PasswordChar = '*'
Text = 'Edit2'
OnChange = Edit2Change
end
object GrayCheckBox2: TCheckBox
Text = 'Disabled'
OnClick = GrayCheckBox2Click
end
object PasswordDisplay: TLabel
Text = '(Password field)'
CanExpandWidth = False
end
end
end
|