?? udm.dfm
字號:
object DM: TDM
OldCreateOrder = False
OnCreate = DataModuleCreate
Left = 326
Top = 254
Height = 375
Width = 412
object ADOConnection: TADOConnection
ConnectionString = 'FILE NAME=SAAS.udl'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 40
Top = 24
end
object adSSCard: TADODataSet
Connection = ADOConnection
CursorType = ctStatic
AfterPost = adSSCardAfterPost
OnNewRecord = adSSCardNewRecord
CommandText = 'select * from SSCard'
Parameters = <>
Left = 40
Top = 80
object adSSCardXH: TWideStringField
DisplayLabel = #23398#21495
DisplayWidth = 20
FieldName = 'XH'
Required = True
Size = 50
end
object adSSCardCreateDate: TDateTimeField
DisplayLabel = #24314#21345#26085#26399
DisplayWidth = 10
FieldName = 'CreateDate'
end
object adSSCardMemo: TMemoField
DisplayLabel = #22791#27880
FieldName = 'Memo'
BlobType = ftMemo
end
object adSSCardCurClass: TWideStringField
DisplayLabel = #24403#21069#29677#32423
DisplayWidth = 10
FieldName = 'CurClass'
Size = 50
end
object adSSCardName: TWideStringField
DisplayLabel = #22995#21517
DisplayWidth = 10
FieldName = 'Name'
end
object adSSCardSex: TWideStringField
DisplayLabel = #24615#21035
FieldName = 'Sex'
Size = 4
end
object adSSCardPeople: TWideStringField
DisplayLabel = #27665#26063
DisplayWidth = 4
FieldName = 'People'
end
object adSSCardBirthday: TDateTimeField
DisplayLabel = #20986#29983#24180#26376
DisplayWidth = 10
FieldName = 'Birthday'
end
object adSSCardNative: TWideStringField
DisplayLabel = #31821#36143
DisplayWidth = 10
FieldName = 'Native'
Size = 50
end
object adSSCardMOT: TWideStringField
DisplayLabel = #26159#21542#28872#23646#12289#21326#20392#12289#21488#32990#23376#22899
DisplayWidth = 10
FieldName = 'MOT'
end
object adSSCardRegKind: TWideStringField
DisplayLabel = #25143#21475#24615#36136
DisplayWidth = 10
FieldName = 'RegKind'
end
object adSSCardRegPS: TWideStringField
DisplayLabel = #25143#31821#25152#22312#22320#27966#20986#25152
DisplayWidth = 20
FieldName = 'RegPS'
Size = 100
end
object adSSCardAddress: TWideStringField
DisplayLabel = #23478#24237#20303#22336
DisplayWidth = 40
FieldName = 'Address'
Size = 100
end
object adSSCardAddPS: TWideStringField
DisplayLabel = #25152#23646#27966#20986#25152
DisplayWidth = 20
FieldName = 'AddPS'
Size = 100
end
object adSSCardRAMR: TMemoField
DisplayLabel = #20303#22336#12289#25143#31821#21464#26356#35760#36733
FieldName = 'RAMR'
BlobType = ftMemo
end
object adSSCardGSPhoto: TBlobField
DisplayLabel = #23567#23398#29031#29255
FieldName = 'GSPhoto'
end
object adSSCardJHSPhoto: TBlobField
DisplayLabel = #21021#20013#29031#29255
FieldName = 'JHSPhoto'
end
end
object dsSSCard: TDataSource
DataSet = adSSCard
Left = 40
Top = 152
end
object dsFamily: TDataSource
DataSet = atFamily
Left = 104
Top = 152
end
object dsGrade: TDataSource
DataSet = atGrade
Left = 168
Top = 152
end
object dsZXFL: TDataSource
DataSet = atZXFL
Left = 224
Top = 152
end
object dsGraduate: TDataSource
DataSet = atGraduate
Left = 280
Top = 152
end
object atFamily: TADOTable
Connection = ADOConnection
CursorType = ctStatic
IndexFieldNames = 'XH'
MasterFields = 'XH'
MasterSource = dsSSCard
TableName = 'Family'
Left = 104
Top = 80
object atFamilyID: TAutoIncField
DisplayLabel = #32534#21495
FieldName = 'ID'
ReadOnly = True
end
object atFamilyXH: TWideStringField
DisplayLabel = #23398#21495
FieldName = 'XH'
Size = 50
end
object atFamilyTitle: TWideStringField
DisplayLabel = #31216#35859
FieldName = 'Title'
Size = 10
end
object atFamilyName: TWideStringField
DisplayLabel = #22995#21517
FieldName = 'Name'
end
object atFamilyWorkPlace: TWideStringField
DisplayLabel = #24037#20316#21333#20301
FieldName = 'WorkPlace'
Size = 100
end
object atFamilyBusiness: TWideStringField
DisplayLabel = #32844#21153
FieldName = 'Business'
end
object atFamilyTel: TWideStringField
DisplayLabel = #30005#35805
FieldName = 'Tel'
end
end
object atZXFL: TADOTable
Connection = ADOConnection
CursorType = ctStatic
IndexFieldNames = 'XH'
MasterFields = 'XH'
MasterSource = dsSSCard
TableName = 'ZXFL'
Left = 224
Top = 80
object atZXFLID: TAutoIncField
DisplayLabel = #32534#21495
FieldName = 'ID'
ReadOnly = True
end
object atZXFLXH: TWideStringField
DisplayLabel = #23398#21495
FieldName = 'XH'
Size = 50
end
object atZXFLEvent: TWideStringField
DisplayLabel = #39033#30446
FieldName = 'Event'
Size = 10
end
object atZXFLEDate: TDateTimeField
DisplayLabel = #26102#38388
FieldName = 'EDate'
end
object atZXFLMemo: TWideStringField
DisplayLabel = #20869#23481
FieldName = 'Memo'
Size = 100
end
object atZXFLFillMan: TWideStringField
DisplayLabel = #22635#20889#20154
FieldName = 'FillMan'
end
end
object atGraduate: TADOTable
Connection = ADOConnection
CursorType = ctStatic
IndexFieldNames = 'XH'
MasterFields = 'XH'
MasterSource = dsSSCard
TableName = 'Graduate'
Left = 280
Top = 80
object atGraduateID: TAutoIncField
DisplayLabel = #32534#21495
FieldName = 'ID'
ReadOnly = True
end
object atGraduateXH: TWideStringField
DisplayLabel = #23398#21495
FieldName = 'XH'
Size = 50
end
object atGraduateCourse: TWideStringField
DisplayLabel = #35838#31243
FieldName = 'Course'
Size = 50
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -