📄 dmconn.dfm
字号:
object dmFRDemo: TdmFRDemo
OldCreateOrder = False
Left = 483
Top = 198
Height = 150
Width = 215
object conAccess: TADOConnection
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Delphi Demo\FR3D' +
'emo\FR3Demo.mdb;Persist Security Info=False'
KeepConnection = False
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 32
Top = 32
end
object qryAccess: TADOQuery
Connection = conAccess
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'select * from tMenu')
Left = 80
Top = 32
object qryAccessfMenuID: TAutoIncField
DisplayLabel = #33756#21333#32534#21495
FieldName = 'fMenuID'
ReadOnly = True
end
object qryAccessfMenuName: TWideStringField
DisplayLabel = #37202#33756#21517#31216
FieldName = 'fMenuName'
end
object qryAccessfMenuUnit: TWideStringField
DisplayLabel = #37202#33756#21333#20301
FieldName = 'fMenuUnit'
Size = 6
end
object qryAccessfMenuPrice: TIntegerField
DisplayLabel = #21333#20215
FieldName = 'fMenuPrice'
end
object qryAccessfMenuType: TWideStringField
DisplayLabel = #37202#33756#31867#21035
FieldName = 'fMenuType'
end
object qryAccessfMenuMemo: TWideStringField
DisplayLabel = #22791#27880
FieldName = 'fMenuMemo'
Size = 50
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -