UI 추가 및 데이타셋 추가
This commit is contained in:
@@ -0,0 +1,42 @@
|
||||
object dmData: TdmData
|
||||
Height = 352
|
||||
Width = 455
|
||||
object mdEmployee: TdxMemData
|
||||
Indexes = <>
|
||||
Persistent.Data = {
|
||||
5665728FC2F5285C8FFE3F060000000A000000010005006E616D650002000000
|
||||
0200040061676500040000000300070073616C61727900020000000500040073
|
||||
6578000A00000001000900706F736974696F6E001E0000000100080061646472
|
||||
657373000106000000C0CCB0FCC0E70134000100E1F5050101000104000000B4
|
||||
EBC7A50114000000BACEBBEA20C7D8BFEEB4EBB1B820B9DDBCDBB5BF}
|
||||
SortOptions = []
|
||||
Left = 288
|
||||
Top = 160
|
||||
object mdEmployeename: TStringField
|
||||
FieldName = 'name'
|
||||
Size = 10
|
||||
end
|
||||
object mdEmployeeage: TSmallintField
|
||||
FieldName = 'age'
|
||||
end
|
||||
object mdEmployeesalary: TIntegerField
|
||||
FieldName = 'salary'
|
||||
end
|
||||
object mdEmployeesex: TBooleanField
|
||||
FieldName = 'sex'
|
||||
end
|
||||
object mdEmployeeposition: TStringField
|
||||
FieldName = 'position'
|
||||
Size = 10
|
||||
end
|
||||
object mdEmployeeaddress: TStringField
|
||||
FieldName = 'address'
|
||||
Size = 30
|
||||
end
|
||||
end
|
||||
object dsEmployee: TDataSource
|
||||
DataSet = mdEmployee
|
||||
Left = 192
|
||||
Top = 152
|
||||
end
|
||||
end
|
||||
Reference in New Issue
Block a user