pas_dm3.pas

比较详细的功能

unit pas_dm3;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  Tdm3 = class(TDataModule)
    Query_fd: TADOQuery;
    Ds_fd: TDataSource;
    query_fdht: TADOQuery;
    ds_fdht: TDataSource;
    query_kh: TADOQuery;
    ds_kh: TDataSource;
    query_khht: TADOQuery;
    ds_khht: TDataSource;
    aq1: TADOQuery;
    query_fdjk: TADOQuery;
    ds_fdjk: TDataSource;
    query_khjk: TADOQuery;
    ds_khjk: TDataSource;
    query_fdsz: TADOQuery;
    ds_fdsz: TDataSource;
    query_khsz: TADOQuery;
    ds_khsz: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dm3: Tdm3;

implementation
      uses pas_dm;
{$R *.dfm}

end.