datmod.~pas

来自「通过此软件可方便的对interbase数据库进行合并」· ~PAS 代码 · 共 36 行

unit datmod;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  IBDatabase, Db, IBCustomDataSet, IBTable, IBQuery, DBTables;

type
  TDataModule1 = class(TDataModule)
    Table1: TTable;
    Table2: TTable;
    Session1: TSession;
    Session2: TSession;
    Database1: TDatabase;
    Database2: TDatabase;
    Database3: TDatabase;
    Session3: TSession;
    Query1: TQuery;
    Query2: TQuery;
    Query3: TQuery;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  DataModule1: TDataModule1;

implementation
  uses edit;
{$R *.DFM}

end.