myldbserver.pas

来自「一个本地database引擎,支持中文T_Sql查询,兼容DELPHI标准数据库」· PAS 代码 · 共 112 行

unit MYLDBServer;

interface

{$I MYLDBVer.inc}

uses SysUtils,Classes,

// MYLDBoluteDatabase units

     MYLDBBase,
     MYLDBLocalEngine,
     MYLDBCompression,
     MYLDBSecurity,
     MYLDBTypes,
     MYLDBConst;

type


////////////////////////////////////////////////////////////////////////////////
//
// TMYLDBServerSharedObjects
//
////////////////////////////////////////////////////////////////////////////////


  TMYLDBServerSharedObjects = class (TObject)
  end; // TMYLDBServerSharedObjects


////////////////////////////////////////////////////////////////////////////////
//
// TMYLDBServerRouter
//
////////////////////////////////////////////////////////////////////////////////


  TMYLDBServerRouter = class (TObject)
   private
    FServerSharedPbjects: TMYLDBServerSharedObjects;
  end; // TMYLDBServerRouter


////////////////////////////////////////////////////////////////////////////////
//
// TMYLDBServerSecurityManager
//
////////////////////////////////////////////////////////////////////////////////


  TMYLDBServerSecurityManager = class (TObject)
  end; // TMYLDBServerSecurityManager


////////////////////////////////////////////////////////////////////////////////
//
// TMYLDBServerSession
//
////////////////////////////////////////////////////////////////////////////////


  TMYLDBServerSession = class (TObject)
   private
    FServerRouter:  TMYLDBServerRouter;
   public
  end; // TMYLDBServerSession


////////////////////////////////////////////////////////////////////////////////
//
// TMYLDBServerBLOBStream
//
////////////////////////////////////////////////////////////////////////////////


  // server BLOB stream
  TMYLDBServerBLOBStream = class (TStream)
  private
   FSession:          TMYLDBServerSession;
   // FServerStreamID
  public
   // blob stream interface
  end; // TMYLDBServerBLOBStream


////////////////////////////////////////////////////////////////////////////////
//
// TMYLDBServerSQLProcessor
//
////////////////////////////////////////////////////////////////////////////////


  TMYLDBServerSQLProcessor = class (TObject)
  end; // TMYLDBServerSQLProcessor


////////////////////////////////////////////////////////////////////////////////
//
// TMYLDBServer
//
////////////////////////////////////////////////////////////////////////////////


  TMYLDBServer = class (TComponent)
  end; // TMYLDBServer


implementation

end.