www.pudn.com > jiaocaiguanlixitongdaima.rar > DataModuleUnit.pas

unit DataModuleUnit; 
 
interface 
 
uses 
  SysUtils, Classes, DB, ADODB; 
 
type 
  TfrmDataModule = class(TDataModule) 
    Connection: TADOConnection; 
    OperatorQuery: TADOQuery; 
    OperatorManage: TADOStoredProc; 
    ClassManage: TADOTable; 
    DepartmentManage: TADOTable; 
  private 
    { Private declarations } 
  public 
    { Public declarations } 
  end; 
 
var 
  frmDataModule: TfrmDataModule; 
 
implementation 
 
{$R *.dfm} 
 
end.