mc_data.~pas

1、系统环境要求：所有程序均在Windows98/XP操作系统下测试运行。 2、建议用户在系统上安装DELPHI7.0企业版。 3、如果数据库为SQL Server数据库

unit MC_Data;

interface

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

type
  TData = class(TDataModule)
    XQXXB: TTable;
    XQXXBBDEDesigner: TStringField;
    XQXXBBDEDesigner2: TStringField;
    XQXXBBDEDesigner3: TStringField;
    XQXXBBDEDesigner4: TStringField;
    XQXXBBDEDesigner5: TIntegerField;
    XQXXBBDEDesigner6: TStringField;
    XQXXBBDEDesigner7: TMemoField;
    XQXXBBDEDesigner8: TBlobField;
    DLXXB: TTable;
    DLXXBBDEDesigner: TStringField;
    DLXXBBDEDesigner2: TStringField;
    DLXXBBDEDesigner3: TStringField;
    DLXXBBDEDesigner4: TStringField;
    DLXXBBDEDesigner5: TIntegerField;
    DLXXBBDEDesigner6: TStringField;
    DLXXBBDEDesigner7: TStringField;
    DLXXBBDEDesigner8: TMemoField;
    DLXXBBDEDesigner9: TBlobField;
    FWXXB: TTable;
    FWXXBBDEDesigner: TStringField;
    FWXXBBDEDesigner2: TStringField;
    FWXXBBDEDesigner3: TStringField;
    FWXXBBDEDesigner4: TStringField;
    FWXXBBDEDesigner5: TStringField;
    FWXXBBDEDesigner6: TStringField;
    FWXXBBDEDesigner7: TStringField;
    FWXXBBDEDesigner8: TStringField;
    FWXXBBDEDesigner9: TStringField;
    FWXXBBDEDesigner10: TStringField;
    FWXXBBDEDesigner11: TStringField;
    FWXXBBDEDesigner12: TStringField;
    FWXXBBDEDesigner13: TStringField;
    FWXXBBDEDesigner14: TFloatField;
    FWXXBBDEDesigner15: TFloatField;
    FWXXBBDEDesigner16: TFloatField;
    FWXXBBDEDesigner17: TFloatField;
    FWXXBBDEDesigner18: TStringField;
    FWXXBBDEDesigner19: TMemoField;
    XQXXBBDEDesigner9: TIntegerField;
    XQXXBBDEDesigner10: TFloatField;
    XQXXBBDEDesigner11: TFloatField;
    XQXXBBDEDesigner12: TIntegerField;
    DLXXBBDEDesigner10: TIntegerField;
    DLXXBBDEDesigner11: TIntegerField;
    FWXXBBDEDesigner20: TStringField;
    FWXXBBDEDesigner21: TStringField;
    XQXXBBDEDesigner13: TDateTimeField;
    XQXXBBDEDesigner14: TDateTimeField;
    XQXXBBDEDesigner15: TFloatField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Data: TData;

implementation

{$R *.DFM}

end.