?? unitdm.dfm
字號:
object DM: TDM
OldCreateOrder = False
Left = 206
Top = 109
Height = 154
Width = 529
object Con: TADOConnection
Connected = True
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='#38899#20687#31199#36161#25968 +
#25454'.mdb;Mode=Share Deny None;Extended Properties="";Jet OLEDB:Syst' +
'em database="";Jet OLEDB:Registry Path="";Jet OLEDB:Database Pas' +
'sword="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode' +
'=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Tra' +
'nsactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create ' +
'System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB' +
':Don'#39't Copy Locale on Compact=False;Jet OLEDB:Compact Without Re' +
'plica Repair=False;Jet OLEDB:SFP=False'
LoginPrompt = False
Mode = cmShareDenyNone
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 32
Top = 16
end
object AllFilmDS: TADODataSet
Active = True
Connection = Con
CursorType = ctStatic
CommandText = 'select * from '#24433#29255#24211
Parameters = <>
Left = 88
Top = 16
object AllFilmDSDSDesigner: TWideStringField
FieldName = #24433#29255#21495
Required = True
Size = 10
end
object AllFilmDSDSDesigner2: TWideStringField
FieldName = #29255#21517
Size = 15
end
object AllFilmDSDSDesigner3: TWideStringField
FieldName = #23548#28436
Size = 10
end
object AllFilmDSDSDesigner4: TWideStringField
FieldName = #20027#28436
end
object AllFilmDSDSDesigner5: TBCDField
FieldName = #38656#35201#25276#37329
Precision = 19
end
object AllFilmDSDSDesigner6: TBCDField
FieldName = #26085#31199#37329
Precision = 19
end
object AllFilmDSDSDesigner7: TWordField
FieldName = #26085#28040#32791#29255#27425
end
object AllFilmDSDSDesigner8: TDateTimeField
FieldName = #20837#24211#26085#26399
end
object AllFilmDSDSDesigner9: TWideStringField
FieldName = #29366#24577
Size = 5
end
object AllFilmDSDSDesigner10: TWideStringField
FieldName = #22791#27880
Size = 50
end
end
object AllFilmDSrc: TDataSource
DataSet = AllFilmDS
Left = 144
Top = 16
end
object TypeDS: TADODataSet
Active = True
Connection = Con
CursorType = ctStatic
CommandText = 'select * from '#20250#21592#31181#31867
Parameters = <>
Left = 88
Top = 64
object TypeDSDSDesigner: TWideStringField
FieldName = #20250#21592#31181#31867
Size = 5
end
object TypeDSDSDesigner2: TBCDField
FieldName = #37329#39069
Precision = 19
end
object TypeDSDSDesigner3: TSmallintField
FieldName = #21487#29992#29255#27425
end
object TypeDSDSDesigner4: TWideStringField
FieldName = #22791#27880
Size = 50
end
end
object TypeDSrc: TDataSource
DataSet = TypeDS
Left = 144
Top = 64
end
object MenberDS: TADODataSet
Active = True
Connection = Con
CursorType = ctStatic
CommandText = 'select * from '#20250#21592#35760#24405
Parameters = <>
Left = 232
Top = 16
object MenberDSDSDesigner: TWideStringField
FieldName = #20250#21592#21495
Size = 10
end
object MenberDSDSDesigner2: TWideStringField
FieldName = #22995#21517
Size = 10
end
object MenberDSDSDesigner3: TWideStringField
FieldName = #36523#20221#35777#21495#30721
end
object MenberDSDSDesigner4: TWideStringField
FieldName = #31181#31867
Size = 5
end
object MenberDSDSDesigner5: TDateTimeField
FieldName = #20837#20250#26085#26399
end
object MenberDSDSDesigner6: TSmallintField
FieldName = #21487#29992#29255#27425
end
object MenberDSDSDesigner7: TWideStringField
FieldName = #22791#27880
Size = 50
end
end
object MenberDSrc: TDataSource
DataSet = MenberDS
Left = 296
Top = 17
end
object ComCZDS: TADODataSet
Active = True
Connection = Con
CursorType = ctStatic
CommandText = 'select * from '#19968#33324#31199#36161
Parameters = <>
Left = 232
Top = 64
object ComCZDSDSDesigner: TAutoIncField
FieldName = #24207#21495
ReadOnly = True
end
object ComCZDSDSDesigner2: TWideStringField
FieldName = #24433#29255#21495
Size = 10
end
object ComCZDSDSDesigner3: TBCDField
FieldName = #25276#37329
Precision = 19
end
object ComCZDSDSDesigner4: TDateTimeField
FieldName = #31199#20511#26085#26399
end
object ComCZDSDSDesigner5: TDateTimeField
FieldName = #24402#36824#26085#26399
end
object ComCZDSDSDesigner6: TBCDField
FieldName = #24212#20184#31199#37329
Precision = 19
end
object ComCZDSDSDesigner8: TBooleanField
FieldName = #24050#24402#36824
end
object ComCZDSDSDesigner7: TWideStringField
FieldName = #22791#27880
Size = 50
end
end
object ComCZDSrc: TDataSource
DataSet = ComCZDS
Left = 296
Top = 64
end
object MenCZDS: TADODataSet
Active = True
Connection = Con
CursorType = ctStatic
CommandText = 'select * from '#20250#21592#31199#36161
Parameters = <>
Left = 368
Top = 64
object MenCZDSDSDesigner: TAutoIncField
FieldName = #24207#21495
ReadOnly = True
end
object MenCZDSDSDesigner2: TWideStringField
FieldName = #24433#29255#21495
Size = 10
end
object MenCZDSDSDesigner5: TWideStringField
FieldName = #20250#21592#21495
Size = 10
end
object MenCZDSDSDesigner6: TBCDField
FieldName = #25276#37329
Precision = 19
end
object MenCZDSDSDesigner3: TDateTimeField
FieldName = #31199#20511#26085#26399
end
object MenCZDSDSDesigner4: TDateTimeField
FieldName = #24402#36824#26085#26399
end
object MenCZDSDSDesigner7: TWordField
FieldName = #28040#32791#29255#27425
end
object MenCZDSDSDesigner9: TBooleanField
FieldName = #24050#24402#36824
end
object MenCZDSDSDesigner8: TWideStringField
FieldName = #22791#27880
Size = 50
end
end
object MenCZDSrc: TDataSource
DataSet = MenCZDS
Left = 424
Top = 64
end
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -