📄 unitdata.~dfm
字号:
object DataModule1: TDataModule1
OldCreateOrder = False
Left = 321
Top = 44
Height = 363
Width = 215
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=JsCjGl.mdb;Persist ' +
'Security Info=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 32
Top = 24
end
object ADOQuery1: TADOQuery
Active = True
Connection = ADOConnection1
CursorType = ctStatic
EnableBCD = False
Parameters = <>
SQL.Strings = (
'select * from '#25104#32489)
Left = 120
Top = 24
object ADOQuery1DSDesigner: TWideStringField
FieldName = #23398#26657
Size = 15
end
object ADOQuery1DSDesigner2: TWideStringField
FieldName = #24180#32423
Size = 12
end
object ADOQuery1DSDesigner3: TWideStringField
FieldName = #31185#30446
Size = 10
end
object ADOQuery1DSDesigner4: TWideStringField
FieldName = #22995#21517
Size = 12
end
object ADOQuery1DSDesigner5: TSmallintField
FieldName = #23398#29983#25968
end
object ADOQuery1DSDesigner6: TSmallintField
FieldName = #32771#29983#25968
end
object ADOQuery1DSDesigner7: TFloatField
FieldName = #21442#32771#29575
DisplayFormat = '0.00'
end
object ADOQuery1DSDesigner8: TFloatField
FieldName = #24635#20998
DisplayFormat = '0.0'
end
object ADOQuery1DSDesigner9: TFloatField
FieldName = #24179#22343#20998
DisplayFormat = '0.00'
end
object ADOQuery1DSDesigner10: TSmallintField
FieldName = #21450#26684#25968
end
object ADOQuery1DSDesigner11: TFloatField
FieldName = #21450#26684#29575
DisplayFormat = '0.00'
end
object ADOQuery1DSDesigner12: TSmallintField
FieldName = #20248#31168#25968
end
object ADOQuery1DSDesigner13: TFloatField
FieldName = #20248#31168#29575
DisplayFormat = '0.00'
end
object ADOQuery1DSDesigner14: TFloatField
FieldName = #32508#21512#24471#20998
DisplayFormat = '0.00'
end
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 120
Top = 96
end
object ADOQuery2: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 32
Top = 96
end
object ADOQueryGrade: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 32
Top = 168
end
object ADOQueryKm: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 120
Top = 168
end
object ADOQuerySchool: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 32
Top = 240
end
object ADOQueryAllBySchool: TADOQuery
Active = True
Connection = ADOConnection1
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from '#25104#32489)
Left = 120
Top = 248
object ADOQueryAllBySchoolDSDesigner: TWideStringField
FieldName = #23398#26657
Size = 15
end
object ADOQueryAllBySchoolDSDesigner2: TWideStringField
FieldName = #24180#32423
Size = 12
end
object ADOQueryAllBySchoolDSDesigner3: TWideStringField
FieldName = #31185#30446
Size = 10
end
object ADOQueryAllBySchoolDSDesigner4: TWideStringField
FieldName = #22995#21517
Size = 12
end
object ADOQueryAllBySchoolDSDesigner5: TSmallintField
FieldName = #23398#29983#25968
end
object ADOQueryAllBySchoolDSDesigner6: TSmallintField
FieldName = #32771#29983#25968
end
object ADOQueryAllBySchoolDSDesigner7: TFloatField
FieldName = #21442#32771#29575
DisplayFormat = '0.0'
end
object ADOQueryAllBySchoolDSDesigner8: TFloatField
FieldName = #24635#20998
DisplayFormat = '0.0'
end
object ADOQueryAllBySchoolDSDesigner9: TFloatField
FieldName = #24179#22343#20998
DisplayFormat = '0.00'
end
object ADOQueryAllBySchoolDSDesigner10: TSmallintField
FieldName = #21450#26684#25968
end
object ADOQueryAllBySchoolDSDesigner11: TFloatField
FieldName = #21450#26684#29575
DisplayFormat = '0.0'
end
object ADOQueryAllBySchoolDSDesigner12: TSmallintField
FieldName = #20248#31168#25968
end
object ADOQueryAllBySchoolDSDesigner13: TFloatField
FieldName = #20248#31168#29575
DisplayFormat = '0.0'
end
object ADOQueryAllBySchoolDSDesigner14: TFloatField
FieldName = #32508#21512#24471#20998
DisplayFormat = '0.0'
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -