📄 unit_dm.~dfm
字号:
object dm: Tdm
OldCreateOrder = False
Left = 806
Top = 171
Height = 384
Width = 215
object adoc: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=data\' +
'StduentManage1.mdb;Mode=Share Deny None;Extended Properties="";P' +
'ersist Security Info=False;Jet OLEDB:System database="";Jet OLED' +
'B:Registry Path="";Jet OLEDB:Database Password=studentmanager;Je' +
't OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLED' +
'B:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1' +
';Jet OLEDB:New Database Password="";Jet OLEDB:Create System Data' +
'base=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don'#39't Copy' +
' Locale on Compact=False;Jet OLEDB:Compact Without Replica Repai' +
'r=False;Jet OLEDB:SFP=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 24
Top = 8
end
object ds_curri: TDataSource
DataSet = adot_curri
Left = 96
Top = 64
end
object ds_class: TDataSource
DataSet = adot_class
Left = 96
Top = 128
end
object ds_student: TDataSource
DataSet = adot_student
Left = 96
Top = 184
end
object ds_cj: TDataSource
DataSet = adot_cj
Left = 96
Top = 240
end
object adot_curri: TADODataSet
Active = True
Connection = adoc
CursorType = ctStatic
CommandText = 'select * from '#35838#31243
Parameters = <>
Left = 24
Top = 64
object adot_curriDSDesigner: TWideStringField
FieldName = #35838#31243#21517#31216
Size = 50
end
object adot_curriDSDesigner2: TIntegerField
FieldName = #23398#20998
end
end
object adot_class: TADODataSet
Active = True
Connection = adoc
CursorType = ctStatic
CommandText = 'select * from '#29677#32423
Parameters = <>
Left = 24
Top = 128
object adot_classDSDesigner: TWideStringField
FieldName = #29677#32423#21517#31216
Size = 50
end
object adot_classDSDesigner2: TIntegerField
FieldName = #27605#19994#23398#20998
end
end
object adot_student: TADODataSet
Active = True
Connection = adoc
CursorType = ctStatic
CommandText = 'select * from '#23398#29983
Parameters = <>
Left = 24
Top = 192
end
object adot_cj: TADODataSet
Active = True
Connection = adoc
CursorType = ctStatic
CommandText = 'select * from '#25104#32489
Parameters = <>
Left = 24
Top = 248
object adot_cjDSDesigner: TAutoIncField
FieldName = #32534#21495
ReadOnly = True
end
object adot_cjDSDesigner2: TWideStringField
FieldName = #23398#21495
Size = 50
end
object adot_cjDSDesigner3: TWideStringField
FieldName = #35838#31243
Size = 50
end
object adot_cjDSDesigner4: TIntegerField
FieldName = #23398#20998
end
object adot_cjDSDesigner5: TWideStringField
FieldName = #29677#32423
Size = 50
end
object adot_cjDSDesigner6: TWideStringField
FieldName = #34917#32771
Size = 50
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -