-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathView.Principal.lfm
57 lines (57 loc) · 980 Bytes
/
View.Principal.lfm
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
object Form1: TForm1
Left = -428
Height = 203
Top = -607
Width = 273
Caption = 'Form1'
ClientHeight = 203
ClientWidth = 273
OnCreate = FormCreate
Position = poMainFormCenter
LCLVersion = '2.2.6.0'
object edtNome: TEdit
Left = 16
Height = 23
Top = 56
Width = 80
TabOrder = 0
end
object edtSobrenome: TEdit
Left = 16
Height = 23
Top = 88
Width = 80
TabOrder = 1
end
object btnExecuta: TButton
Left = 16
Height = 25
Top = 120
Width = 75
Caption = 'Executar'
OnClick = btnExecutaClick
TabOrder = 2
end
object memResult: TMemo
Left = 104
Height = 130
Top = 16
Width = 150
TabOrder = 3
end
object cbxTipoPessoa: TComboBox
Left = 16
Height = 23
Top = 24
Width = 80
ItemHeight = 15
ItemIndex = 0
Items.Strings = (
'Fisica'
'Juridica'
)
OnChange = cbxTipoPessoaChange
TabOrder = 4
Text = 'Fisica'
end
end