conndbfactory.pas

Delphi最新三层源码(1.0),对delphi有帮助

//--------------------------------------------------------------------------
//                          数据库连接工厂对象基类
//1.通过该抽象工厂创建数据库实例。
//--------------------------------------------------------------------------


unit ConnDBFactory;

interface

uses
  Classes, ConnDB, Controls, IConnDB;

type TConnDBFactory = class(TPersistent)
  public
    function CreatorConnDB() :IConnDataBase; virtual; abstract;
end;

implementation

end.