?? unit_dm.pas
字號:
//---------------------------------------------------
// 功能描述: 數(shù)據(jù)庫連接模塊
// 作者: 王歡燕
// 開發(fā)時間: 2003-07-12
//---------------------------------------------------
unit Unit_DM;
interface
uses
SysUtils, Classes, DB, ADODB;
type
Tdm = class(TDataModule)
adoc: TADOConnection;
ds_curri: TDataSource;
ds_class: TDataSource;
ds_student: TDataSource;
ds_cj: TDataSource;
adot_curri: TADODataSet;
adot_curriDSDesigner: TWideStringField;
adot_curriDSDesigner2: TIntegerField;
adot_class: TADODataSet;
adot_student: TADODataSet;
adot_cj: TADODataSet;
adot_classDSDesigner: TWideStringField;
adot_classDSDesigner2: TIntegerField;
adot_cjDSDesigner: TAutoIncField;
adot_cjDSDesigner2: TWideStringField;
adot_cjDSDesigner3: TWideStringField;
adot_cjDSDesigner4: TIntegerField;
adot_cjDSDesigner5: TWideStringField;
adot_cjDSDesigner6: TWideStringField;
private
{ Private declarations }
public
{ Public declarations }
end;
var
dm: Tdm;
implementation
{$R *.dfm}
end.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -