server_tlb.h

Direct Oracle Access 非常好的Oracle数据库直接访问组件包 支持个版本的Delphi及C++ Builder 有源码

// ************************************************************************ //
// WARNING                                                                  //
// -------                                                                  //
// The types declared in this file were generated from data read from a     //
// Type Library. If this type library is explicitly or indirectly (via      //
// another type library referring to this type library) re-imported, or the //
// 'Refresh' command of the Type Library Editor activated while editing the //
// Type Library, the contents of this file will be regenerated and all      //
// manual modifications will be lost.                                       //
// ************************************************************************ //

// C++ TLBWRTR : $Revision:   1.96.1.27  $
// File generated on 21-3-1999 15:55:25 from Type Library described below.

// ************************************************************************ //
// Type Lib: C:\Program Files\Borland\CBuilder4\Projects\Demos\3Tier\Server.tlb
// IID\LCID: {822135E0-0E9B-11D2-BD34-0020AF0B5A0C}\0
// Helpfile: 
// DepndLst: 
//   (1) v4.0 StdVCL, (C:\WINDOWS\SYSTEM\STDVCL40.DLL)
//   (2) v2.0 stdole, (C:\WINDOWS\SYSTEM\STDOLE2.TLB)
// ************************************************************************ //
#ifndef   __Server_TLB_h__
#define   __Server_TLB_h__

#pragma option push -b -w-inl

#include <vcl/utilcls.h>
#if !defined(__UTILCLS_H_VERSION) || (__UTILCLS_H_VERSION < 0x0101)
#error "This file requires an newer version of the header file UTILCLS.H"
#endif

#include <olectl.h>
#include <ocidl.h>
#if defined(USING_ATLVCL) || defined(USING_ATL)
#if !defined(__TLB_NO_EVENT_WRAPPERS)
#include <atl/atlmod.h>
#endif
#endif

#include "databkr.hpp"

// *********************************************************************//
// Forward reference of some VCL types (to avoid including STDVCL.HPP)  //
// *********************************************************************//
namespace Stdvcl {class IStrings; class IStringsDisp;}
using namespace Stdvcl;

namespace Server_tlb
{

// *********************************************************************//
// HelpString: Server Library
// Version:    1.0
// *********************************************************************//


// *********************************************************************//
// GUIDS declared in the TypeLibrary. Following prefixes are used:      //
//   Type Libraries     : LIBID_xxxx                                    //
//   CoClasses          : CLSID_xxxx                                    //
//   DISPInterfaces     : DIID_xxxx                                     //
//   Non-DISP interfaces: IID_xxxx                                      //
// *********************************************************************//
DEFINE_GUID(LIBID_Server, 0x822135E0, 0x0E9B, 0x11D2, 0xBD, 0x34, 0x00, 0x20, 0xAF, 0x0B, 0x5A, 0x0C);
DEFINE_GUID(IID_IRemoteCPPDM, 0x822135E1, 0x0E9B, 0x11D2, 0xBD, 0x34, 0x00, 0x20, 0xAF, 0x0B, 0x5A, 0x0C);
DEFINE_GUID(CLSID_RemoteCPPDM, 0x822135E3, 0x0E9B, 0x11D2, 0xBD, 0x34, 0x00, 0x20, 0xAF, 0x0B, 0x5A, 0x0C);

// *********************************************************************//
// Forward declaration of types defined in TypeLibrary                  //
// *********************************************************************//
interface DECLSPEC_UUID("{822135E1-0E9B-11D2-BD34-0020AF0B5A0C}") IRemoteCPPDM;

// *********************************************************************//
// Declaration of CoClasses defined in Type Library                     //
// (NOTE: Here we map each CoClass to its Default Interface)            //
//                                                                      //
// The LIBID_OF_ macro(s) map a LIBID_OF_CoClassName to the GUID of this//
// TypeLibrary. It simplifies the updating of macros when CoClass name  //
// change.                                                              //
// *********************************************************************//

#define LIBID_OF_RemoteCPPDM (&LIBID_Server)
// *********************************************************************//
// Interface: IRemoteCPPDM
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {822135E1-0E9B-11D2-BD34-0020AF0B5A0C}
// *********************************************************************//
interface IRemoteCPPDM : public IDataBroker
{
public:
  virtual HRESULT STDMETHODCALLTYPE get_DeptProvider(IProvider** Value/*[out,retval]*/) = 0; // [1]
  virtual HRESULT STDMETHODCALLTYPE get_EmpProvider(IProvider** Value/*[out,retval]*/) = 0; // [2]

#if !defined(__TLB_NO_INTERFACE_WRAPPERS)

  IProvider* __fastcall get_DeptProvider(void)
  {
    IProvider* Value= 0;
    OLECHECK(this->get_DeptProvider(&Value));
    return Value;
  }

  IProvider* __fastcall get_EmpProvider(void)
  {
    IProvider* Value= 0;
    OLECHECK(this->get_EmpProvider(&Value));
    return Value;
  }


  __property   IProvider*      DeptProvider = {read = get_DeptProvider};
  __property   IProvider*      EmpProvider = {read = get_EmpProvider};

#endif //   __TLB_NO_INTERFACE_WRAPPERS

};

#if !defined(__TLB_NO_INTERFACE_WRAPPERS)
// *********************************************************************//
// SmartIntf: TCOMIRemoteCPPDM
// Interface: IRemoteCPPDM
// *********************************************************************//
template <class T /* IRemoteCPPDM */ >
class TCOMIRemoteCPPDMT : public TComInterface<IRemoteCPPDM>, public TComInterfaceBase<IUnknown>
{
public:
  TCOMIRemoteCPPDMT() {}
  TCOMIRemoteCPPDMT(IRemoteCPPDM *intf, bool addRef = false) : TComInterface<IRemoteCPPDM>(intf, addRef) {}
  TCOMIRemoteCPPDMT(const TCOMIRemoteCPPDMT& src) : TComInterface<IRemoteCPPDM>(src) {}
  TCOMIRemoteCPPDMT& operator=(const TCOMIRemoteCPPDMT& src) { Bind(src, true); return *this;}

  HRESULT         __fastcall get_DeptProvider(IProvider** Value/*[out,retval]*/);
  IProvider*      __fastcall get_DeptProvider(void);
  HRESULT         __fastcall get_EmpProvider(IProvider** Value/*[out,retval]*/);
  IProvider*      __fastcall get_EmpProvider(void);

  __property   IProvider*      DeptProvider = {read = get_DeptProvider};
  __property   IProvider*      EmpProvider = {read = get_EmpProvider};
};
typedef TCOMIRemoteCPPDMT<IRemoteCPPDM> TCOMIRemoteCPPDM;

// *********************************************************************//
// DispIntf:  IRemoteCPPDM
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {822135E1-0E9B-11D2-BD34-0020AF0B5A0C}
// *********************************************************************//
template<class T>
class IRemoteCPPDMDispT : public TAutoDriver<IRemoteCPPDM>
{
public:
  IRemoteCPPDMDispT(){}

  IRemoteCPPDMDispT(IRemoteCPPDM *pintf)
  {
    TAutoDriver<IRemoteCPPDM>::Bind(pintf);
  }

  IRemoteCPPDMDispT& operator=(IRemoteCPPDM *pintf)
  {
    TAutoDriver<IRemoteCPPDM>::Bind(pintf);
    return *this;
  }

  HRESULT BindDefault(/*Binds to new instance of CoClass RemoteCPPDM*/)
  {
    return OLECHECK(Bind(CLSID_RemoteCPPDM));
  }

  HRESULT BindRunning(/*Binds to a running instance of CoClass RemoteCPPDM*/)
  {
    return BindToActive(CLSID_RemoteCPPDM);
  }

  HRESULT         __fastcall get_DeptProvider(IProvider** Value/*[out,retval]*/);
  IProvider*      __fastcall get_DeptProvider(void);
  HRESULT         __fastcall get_EmpProvider(IProvider** Value/*[out,retval]*/);
  IProvider*      __fastcall get_EmpProvider(void);
  HRESULT         __fastcall GetProviderNames(TVariant* Value/*[out,retval]*/);
  TVariant        __fastcall GetProviderNames(void);

  __property   IProvider*      DeptProvider = {read = get_DeptProvider};
  __property   IProvider*      EmpProvider = {read = get_EmpProvider};

};
typedef IRemoteCPPDMDispT<IRemoteCPPDM> IRemoteCPPDMDisp;

// *********************************************************************//
// SmartIntf: TCOMIRemoteCPPDM
// Interface: IRemoteCPPDM
// *********************************************************************//
template <class T> HRESULT __fastcall
TCOMIRemoteCPPDMT<T>::get_DeptProvider(IProvider** Value/*[out,retval]*/)
{
  return (*this)->get_DeptProvider(Value);
}

template <class T> IProvider* __fastcall
TCOMIRemoteCPPDMT<T>::get_DeptProvider(void)
{
  IProvider* Value= 0;
  OLECHECK(this->get_DeptProvider(&Value));
  return Value;
}

template <class T> HRESULT __fastcall
TCOMIRemoteCPPDMT<T>::get_EmpProvider(IProvider** Value/*[out,retval]*/)
{
  return (*this)->get_EmpProvider(Value);
}

template <class T> IProvider* __fastcall
TCOMIRemoteCPPDMT<T>::get_EmpProvider(void)
{
  IProvider* Value= 0;
  OLECHECK(this->get_EmpProvider(&Value));
  return Value;
}

// *********************************************************************//
// DispIntf:  IRemoteCPPDM
// Flags:     (4416) Dual OleAutomation Dispatchable
// GUID:      {822135E1-0E9B-11D2-BD34-0020AF0B5A0C}
// *********************************************************************//
template <class T> HRESULT __fastcall
IRemoteCPPDMDispT<T>::get_DeptProvider(IProvider** Value/*[out,retval]*/)
{
  static _TDispID _dispid(*this, OLETEXT("DeptProvider"), DISPID(1));
  TAutoArgs<0> _args;
  return OutRetValSetterPtr((LPDISPATCH*)Value /*[VT_USERDEFINED:2]*/, _args, OlePropertyGet(_dispid, _args));
}

template <class T> IProvider* __fastcall
IRemoteCPPDMDispT<T>::get_DeptProvider(void)
{
  IProvider* Value;
  this->get_DeptProvider(&Value);
  return Value;
}

template <class T> HRESULT __fastcall
IRemoteCPPDMDispT<T>::get_EmpProvider(IProvider** Value/*[out,retval]*/)
{
  static _TDispID _dispid(*this, OLETEXT("EmpProvider"), DISPID(2));
  TAutoArgs<0> _args;
  return OutRetValSetterPtr((LPDISPATCH*)Value /*[VT_USERDEFINED:2]*/, _args, OlePropertyGet(_dispid, _args));
}

template <class T> IProvider* __fastcall
IRemoteCPPDMDispT<T>::get_EmpProvider(void)
{
  IProvider* Value;
  this->get_EmpProvider(&Value);
  return Value;
}

template <class T> HRESULT __fastcall
IRemoteCPPDMDispT<T>::GetProviderNames(TVariant* Value/*[out,retval]*/)
{
  static _TDispID _dispid(*this, OLETEXT("GetProviderNames"), DISPID(22929905));
  TAutoArgs<0> _args;
  return OutRetValSetterPtr(Value /*[VT_VARIANT:1]*/, _args, OleFunction(_dispid, _args));
}

template <class T> TVariant __fastcall
IRemoteCPPDMDispT<T>::GetProviderNames(void)
{
  TVariant Value;
  this->GetProviderNames(&Value);
  return Value;
}

// *********************************************************************//
// The following typedefs expose classes (named CoCoClassName) that     //
// provide static Create() and CreateRemote(LPWSTR machineName) methods //
// for creating an instance of an exposed object. These functions can   //
// be used by client wishing to automate CoClasses exposed by this      //
// typelibrary.                                                         //
// *********************************************************************//

// *********************************************************************//
// COCLASS DEFAULT INTERFACE CREATOR
// CoClass  : RemoteCPPDM
// Interface: TCOMIRemoteCPPDM
// *********************************************************************//
typedef TCoClassCreatorT<TCOMIRemoteCPPDM, IRemoteCPPDM, &CLSID_RemoteCPPDM, &IID_IRemoteCPPDM> CoRemoteCPPDM;
#endif  //   __TLB_NO_INTERFACE_WRAPPERS


};     // namespace Server_tlb

#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using  namespace Server_tlb;
#endif

#pragma option pop

#endif // __Server_TLB_h__