u_dm.pas

来自「c/s系统。 delphi 6+access 运行前先配置数据环境：把db文件夹」· PAS 代码 · 共 41 行

unit u_dm;

interface

uses
  SysUtils, Classes, DB, ADODB;

type
  TDm = class(TDataModule)
    u_ADOConnection1: TADOConnection;
    user: TADOTable;
    u_DataSource1: TDataSource;
    iptable: TADOTable;
    ip_ADOConnection1: TADOConnection;
    iptableip: TWideStringField;
    DataSource1: TDataSource;
    b_ADOConnection1: TADOConnection;
    bxb: TADOTable;
    bxbDSDesigner: TWideStringField;
    bxbDSDesigner2: TWideStringField;
    bxbDSDesigner3: TWideStringField;
    bxbDSDesigner4: TWideStringField;
    bxbDSDesigner5: TWideStringField;
    bxbDSDesigner6: TWideStringField;
    bxbDSDesigner7: TDateTimeField;
    bxbDSDesigner8: TWideStringField;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Dm: TDm;

implementation

{$R *.dfm}

end.