dmgl.pas

delphi制作的校医院收费系统

unit dmgl;

interface

uses
  SysUtils, Classes, ADODB, DB;

type
  Tdm_yaopingl = class(TDataModule)
    rukuzong: TADOTable;
    rukuxi: TADOTable;
    ruzong: TDataSource;
    ruxi: TDataSource;
    ADOQuery1: TADOQuery;
    chuku: TADOTable;
    kucunf: TADOTable;
    chukudatasource: TDataSource;
    kucund: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dm_yaopingl: Tdm_yaopingl;

implementation

{$R *.dfm}  uses connect;

end.