?? dm.dfm
字號:
object dm2: Tdm2
OldCreateOrder = False
Left = 388
Top = 219
Height = 236
Width = 282
object ADOConnection1: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=xmjl.' +
'mdb;Mode=Share Deny None;Extended Properties="";Locale Identifie' +
'r=2052;Persist Security Info=False;Jet OLEDB:System database="";' +
'Jet OLEDB:Registry Path="";Jet OLEDB:Database Password="";Jet OL' +
'EDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Gl' +
'obal Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet' +
' OLEDB:New Database Password="";Jet OLEDB:Create System Database' +
'=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don'#39't Copy Loc' +
'ale on Compact=False;Jet OLEDB:Compact Without Replica Repair=Fa' +
'lse;Jet OLEDB:SFP=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 48
Top = 48
end
object ADOQuery1: TADOQuery
Active = True
Connection = ADOConnection1
CursorType = ctStatic
OnCalcFields = ADOQuery1CalcFields
Parameters = <>
SQL.Strings = (
'select * from xmb')
Left = 128
Top = 48
object ADOQuery1DSDesigner: TWideStringField
FieldName = #24207#21495
Size = 5
end
object ADOQuery1DSDesigner2: TBCDField
FieldName = #25910#20837
Precision = 19
end
object ADOQuery1DSDesigner3: TBCDField
FieldName = #25903#20986
Precision = 19
end
object ADOQuery1DSDesigner4: TDateTimeField
FieldName = #26085#26399
end
object ADOQuery1DSDesigner5: TWideStringField
FieldName = #32463#25163#20154
Size = 8
end
object ADOQuery1total: TCurrencyField
FieldKind = fkCalculated
FieldName = #21512#35745
Calculated = True
end
end
object ADOTable1: TADOTable
Active = True
Connection = ADOConnection1
CursorType = ctStatic
TableName = 'new'
Left = 48
Top = 112
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -