-
Notifications
You must be signed in to change notification settings - Fork 1
/
ufrmCadUnidadesDeMedida.dfm
132 lines (132 loc) · 3.29 KB
/
ufrmCadUnidadesDeMedida.dfm
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
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
inherited frmCadUnidadesDeMedida: TfrmCadUnidadesDeMedida
Caption = 'CADASTRO DE UNIDADE DE MEDIDA'
PixelsPerInch = 96
TextHeight = 13
inherited dxRibbon1: TdxRibbon
inherited dxRibbon1Tab1: TdxRibbonTab
Index = 0
end
end
inherited pc: TcxPageControl
TabOrder = 1
ExplicitLeft = 0
ExplicitTop = 122
ExplicitWidth = 675
ExplicitHeight = 357
inherited cxTabSheet1: TcxTabSheet
ExplicitWidth = 667
ExplicitHeight = 349
inherited cxGrid: TcxGrid
ExplicitWidth = 667
ExplicitHeight = 349
inherited cxGridDBTableView1: TcxGridDBTableView
DataController.DataSource = dts
object cxGridDBTableView1ID: TcxGridDBColumn
Caption = 'C'#211'D'
DataBinding.FieldName = 'ID'
end
object cxGridDBTableView1NOME: TcxGridDBColumn
DataBinding.FieldName = 'NOME'
end
object cxGridDBTableView1SIGLA: TcxGridDBColumn
DataBinding.FieldName = 'SIGLA'
Width = 91
end
end
end
end
inherited cxTabSheet2: TcxTabSheet
object Label1: TLabel
Left = 16
Top = 24
Width = 22
Height = 13
Caption = 'C'#211'D'
FocusControl = cxDBSpinEdit1
end
object Label2: TLabel
Left = 136
Top = 24
Width = 29
Height = 13
Caption = 'NOME'
FocusControl = cxDBTextEdit1
end
object Label3: TLabel
Left = 400
Top = 24
Width = 29
Height = 13
Caption = 'SIGLA'
FocusControl = cxDBTextEdit2
end
object cxDBSpinEdit1: TcxDBSpinEdit
Left = 16
Top = 40
DataBinding.DataField = 'ID'
DataBinding.DataSource = dts
Enabled = False
TabOrder = 0
Width = 93
end
object cxDBTextEdit1: TcxDBTextEdit
Left = 136
Top = 40
DataBinding.DataField = 'NOME'
DataBinding.DataSource = dts
TabOrder = 1
Width = 242
end
object cxDBTextEdit2: TcxDBTextEdit
Left = 400
Top = 40
DataBinding.DataField = 'SIGLA'
DataBinding.DataSource = dts
TabOrder = 2
Width = 113
end
end
end
inherited dxBarManager1: TdxBarManager
PixelsPerInch = 96
inherited btnAdc: TdxBarLargeButton
ImageIndex = 0
end
inherited btnEdit: TdxBarLargeButton
ImageIndex = 1
end
inherited btnDel: TdxBarLargeButton
ImageIndex = 2
end
end
inherited dxSkinController1: TdxSkinController
Left = 512
Top = 96
end
inherited cxImageList1: TcxImageList
FormatVersion = 1
end
inherited FDQuery: TFDQuery
UpdateOptions.AssignedValues = [uvGeneratorName]
UpdateOptions.GeneratorName = 'GEN_UNIDADEDEMEDIDA_ID'
UpdateOptions.AutoIncFields = 'ID'
SQL.Strings = (
'SELECT * FROM UNIDADEDEMEDIDA U')
object FDQueryID: TIntegerField
FieldName = 'ID'
Origin = 'ID'
ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
Required = True
end
object FDQueryNOME: TStringField
FieldName = 'NOME'
Origin = 'NOME'
Size = 50
end
object FDQuerySIGLA: TStringField
FieldName = 'SIGLA'
Origin = 'SIGLA'
Size = 5
end
end
end