midasservimpl.h

多层数据库

// MIDASSERVIMPL.H : Declaration of the midasserv

#ifndef midasservImplH
#define midasservImplH

#define ATL_FREE_THREADED
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <MidConst.hpp>

#include "Mdserv_TLB.h"
#include <DB.hpp>
#include <DBTables.hpp>
#include <Provider.hpp>
#include <atl/atlvcl.h>



// Forward ref. of IAppServer implementor


/////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////
class Tmidasserv : public TCRemoteDataModule
{
__published:  // IDE-managed Components
        TDatabase *Database1;
        TDataSetProvider *DataSetProvider1;
        TDataSource *DataSource1;
        TTable *Table2;
        TDataSetProvider *DataSetProvider2;
        TTable *Table1;
        void __fastcall DataSetProvider1BeforeGetRecords(TObject *Sender,
          OleVariant &OwnerData);
        void __fastcall CRemoteDataModuleDestroy(TObject *Sender);
        void __fastcall DataSetProvider2GetData(TObject *Sender,
          TCustomClientDataSet *DataSet);
private:      // User declarations
public:       // User declarations
  __fastcall Tmidasserv(TComponent* Owner);

__published:
};


/////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////
extern PACKAGE Tmidasserv *midasserv;


/////////////////////////////////////////////////////////////////////////////
// TmidasservImpl     Implements Imidasserv, default interface of midasserv
// ThreadingModel : Apartment
// Dual Interface : TRUE
// Event Support  : FALSE
// Default ProgID : Project1.midasserv
// Description    : 
/////////////////////////////////////////////////////////////////////////////
class ATL_NO_VTABLE TmidasservImpl: REMOTEDATAMODULE_IMPL(TmidasservImpl, midasserv, Tmidasserv, Imidasserv)
{
public:

BEGIN_COM_MAP(TmidasservImpl)
  RDMOBJECT_COM_INTERFACE_ENTRIES(Imidasserv)
END_COM_MAP()

  // Data used when registering Object 
  //
  DECLARE_THREADING_MODEL(otApartment);
  DECLARE_PROGID(_T("Mdserv.midasserv"));
  DECLARE_DESCRIPTION(_T(""));

  // Function invoked to (un)register object
  //
  static HRESULT WINAPI UpdateRegistry(BOOL bRegister)
  {
    TRemoteDataModuleRegistrar regObj(GetObjectCLSID(), GetProgID(), GetDescription());
    // Disable these flags in order to disable use by socket or web connections.
    // Also set other flags to configure the behavior of your application server.
    // For more information, see atlmod.h and atlvcl.cpp.
    regObj.Singleton = false;
    regObj.EnableWeb = true;
    regObj.EnableSocket = true;
    return regObj.UpdateRegistry(bRegister);
  }


// Imidasserv
protected: 
  STDMETHOD(UserAuthentication(BSTR UserName, BSTR Password, BSTR* Ret));
  STDMETHOD(NewUser(BSTR UserName, BSTR Password, BSTR* Ret));
};

#endif  // midasservImplH