datamd.pas

来自「DBchart的高级使用」· PAS 代码 · 共 46 行

unit datamd;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, DBTables, ADODB;

type
  TDataModule1 = class(TDataModule)
    basicTable: TTable;
    cwTable: TTable;
    cwinfoTable: TTable;
    ldTable: TTable;
    ldinfoTable: TTable;
    ldlxTable: TTable;
    cwlxTable: TTable;
    Database1: TDatabase;
    importdb: TTable;
    basicTableBDEDesigner: TStringField;
    basicTableBDEDesigner2: TStringField;
    basicTableBDEDesigner3: TStringField;
    basicTableBDEDesigner4: TStringField;
    basicTableBDEDesigner5: TStringField;
    basicTableBDEDesigner6: TStringField;
    basicTableBDEDesigner7: TIntegerField;
    basicTableLdsupply: TIntegerField;
    basicTableLdreclaim: TIntegerField;
    basicTableCwsupply: TIntegerField;
    basicTableCwreclaim: TIntegerField;
    basicTableBDEDesigner8: TSmallintField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataModule1: TDataModule1;

implementation

{$R *.DFM}

end.