// %UNIT_NAME%
//
/*---------------------------------------------------------------------------}
{ This unit was automatically generated by the RemObjects SDK after reading  }
{ the RODL file associated with this project.                                }
{                                                                            }
{ Do not modify this unit manually, or your changes will be lost when this   }
{ unit is regenerated the next time you compile the project.                 }
{---------------------------------------------------------------------------*/

#ifndef %UNIT_NAME%_H
#define %UNIT_NAME%_H

#pragma delphiheader begin
#pragma option push
#pragma option -w-            // All warnings off
#pragma option -Vx            // Zero-length empty class member functions
#pragma pack(push,8)

#include <System.hpp>         // Pascal unit
#include <Classes.hpp>        // Pascal unit
#include <Urotypes.hpp>       // Pascal unit
#include <Uroclient.hpp>      // Pascal unit
#include <Uroclientintf.hpp>  // Pascal unit
#include <Uroxmlintf.hpp>     // Pascal unit
// <%%% START REQUIRED_UNITS %%%>
#include <%REQUIRED_UNIT_NAME%.hpp>
// <%%% END REQUIRED_UNITS %%%>

namespace %NAMESPACE_NAME%
{
// Library ID
#define LibraryUID "%LIBRARY_UID%"
#define TargetNamespace "%NAMESPACE_NAME%"

// Service Interface ID's
// <%%% START SERVICES %%%>
const GUID I%SERVICE_NAME%_IID = Sysutils::StringToGUID("%SERVICE_UID%");
// <%%% END SERVICES %%%>

// Event ID's
// <%%% START EVENT_SINKS %%%>
#define EID_%EVENT_SINK_NAME% "%EVENT_SINK_NAME%"
const GUID I%EVENT_SINK_NAME%_IID = Sysutils::StringToGUID("%EVENT_SINK_UID%");
// <%%% END EVENT_SINKS %%%>

// Forward declarations
// <%%% START SERVICES %%%>
__interface I%SERVICE_NAME%; // = interface;
// <%%% END SERVICES %%%>
// <%%% START ARRAYS %%%>
class DELPHICLASS %ARRAY_NAME%;
// <%%% END ARRAYS %%%>
// <%%% START STRUCTS %%%>
class DELPHICLASS %STRUCT_NAME%;
// <%%% END STRUCTS %%%>
// <%%% START EXCEPTIONS %%%>
class DELPHICLASS %EXCEPTION_NAME%;
// <%%% END EXCEPTIONS %%%>
// <%%% START EVENT_SINKS %%%>
__interface I%EVENT_SINK_NAME%; // = interface;
// <%%% END EVENT_SINKS %%%>

/* Enumerateds */
// <%%% START ENUMS %%%>
// <%%% START DOCUMENTATION %%%>

/* Description:
    %CONTENT% */
// <%%% END DOCUMENTATION %%%>
#pragma option push -b-
enum %ENUM_NAME% {
                 // <%%% START VALUES %%%>
                 %VALUE_NAME%,                
                 // <%%% END VALUES %%%>                
                 };
#pragma option pop
              
// <%%% END ENUMS %%%>
/* Simple type holders */
// Note: In order to get type info for a simple type, we MUST have it from the
// published property of a Delphi class. There is no other way as __typeinfo
// requires the type to actually derive from TObject. Hence the reason why
// we create these dummy classes with a simple property of the correct type.
// <%%% START SIMPLE_TYPES %%%>
#ifndef __Get%TYPE_NAME%Info
class DELPHICLASS %TYPE_NAME%TypeHolder;
class %TYPE_NAME%TypeHolder : public TPersistent
{
private:
  %TYPE_NAME% FHolderField;
__published:
  __property %TYPE_NAME% HolderField = {read=FHolderField, write=FHolderField};
};
#define __Get%TYPE_NAME%Info *::GetPropInfo(__typeinfo(%TYPE_NAME%TypeHolder), "HolderField")->PropType
#endif  // __Get%TYPE_NAME%Info

// <%%% END SIMPLE_TYPES %%%>
// <%%% START STRUCTS %%%>
// %STRUCT_NAME%
class DELPHICLASS %STRUCT_NAME%;
class %STRUCT_NAME% : public Urotypes::TROComplexType
{
  // Allow the use of "inherited" in our class as Delphi allows
  typedef Urotypes::TROComplexType inherited;
  
private:
  // <%%% START FIELDS_NO_STRIP %%%>
  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
  %FIELD_TYPE% f%FIELD_NAME%;
  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
  %FIELD_TYPE%* f%FIELD_NAME%;
  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
  // <%%% END FIELDS_NO_STRIP %%%>

  // <%%% START FIELDS_NO_STRIP %%%>
  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
  %FIELD_TYPE%* __fastcall Get%FIELD_NAME%();
  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
  // <%%% END FIELDS_NO_STRIP %%%>
public:
  virtual void __fastcall Assign(Classes::TPersistent* iSource);
  // <%%% START IF_HAS_FIELDS %%%>
  virtual void __fastcall ReadComplex(TObject* ASerializer);
  virtual void __fastcall WriteComplex(TObject* ASerializer);
  // <%%% END IF_HAS_FIELDS %%%>

__published:
  // <%%% START FIELDS_NO_STRIP %%%>
  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
  __property %FIELD_TYPE% %FIELD_NAME% = {read=f%FIELD_NAME%, write=f%FIELD_NAME%}; 
  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
  __property %FIELD_TYPE%* %FIELD_NAME% = {read=Get%FIELD_NAME%, write=f%FIELD_NAME%};
  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
  // <%%% END FIELDS_NO_STRIP %%%>
public:
  // Pascal constructor/destructor
  #pragma option push -w-inl
  /* TROComplexType.Create */ inline __fastcall virtual %STRUCT_NAME%()/* overload */ : Urotypes::TROComplexType() {}
  #pragma option pop
  #pragma option push -w-inl
  /* TROComplexType.Destroy */ inline __fastcall virtual ~%STRUCT_NAME%() {}
  #pragma option pop
};

// %STRUCT_COLLECTION_NAME%
class DELPHICLASS %STRUCT_COLLECTION_NAME%;
class %STRUCT_COLLECTION_NAME% : public Uroclasses::TROCollection
{
  typedef Uroclasses::TROCollection inherited;

public:
  %STRUCT_NAME%* operator[](int Index) { return Items[Index]; }

protected:
  __fastcall %STRUCT_COLLECTION_NAME%(TMetaClass* aItemClass) : Uroclasses::TROCollection(aItemClass) {} /*overload*/
  %STRUCT_NAME%* __fastcall GetItems(const int Index);
  void __fastcall SetItems(const int Index, %STRUCT_NAME%* Value);

public:
  __fastcall %STRUCT_COLLECTION_NAME%() : Uroclasses::TROCollection(__classid(%STRUCT_NAME%)) {} /*overload*/
  HIDESBASE %STRUCT_NAME%* __fastcall Add(); /*reintroduce*/
  // <%%% START ARRAYS_IS_FOUND %%%>
  void SaveToArray(%ARRAY_NAME%* anArray);
  void LoadFromArray(%ARRAY_NAME%* anArray);
  // <%%% END ARRAYS_IS_FOUND %%%>
  __property %STRUCT_NAME%* Items[int Index] = {read=GetItems, write=SetItems /*default*/};
  #pragma option push -w-inl
  /* TCollection.Destroy */ inline __fastcall virtual ~%STRUCT_COLLECTION_NAME%() {}
  #pragma option pop
};

typedef DynamicArray<%STRUCT_NAME%* > %UNIT_NAME%_%STRUCT_NAME%__4;

// <%%% END STRUCTS %%%>
// <%%% START ARRAYS %%%>
// %ARRAY_NAME%

// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
typedef DynamicArray<%ARRAY_TYPE%> %ARRAY_NAME%_%ARRAY_TYPE%;
// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
typedef DynamicArray<%ARRAY_TYPE%* > %ARRAY_NAME%_%ARRAY_TYPE%;
// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>

class DELPHICLASS %ARRAY_NAME%;
class %ARRAY_NAME% : public Urotypes::TROArray
{
  typedef Urotypes::TROArray inherited;

public:
  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
  %ARRAY_TYPE%* operator[](const int Index) { return Items[Index]; }
  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
  %ARRAY_TYPE% operator[](const int Index) { return Items[Index]; }
  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>

private:
  int fCount;
  %ARRAY_NAME%_%ARRAY_TYPE% fItems;

protected:
  virtual void __fastcall Grow();
  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
  %ARRAY_TYPE%* __fastcall GetItems(const int Index);
  void __fastcall SetItems(const int Index, %ARRAY_TYPE%* Value);
  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
  %ARRAY_TYPE% __fastcall GetItems(const int Index);
  void __fastcall SetItems(const int Index, %ARRAY_TYPE% Value);
  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
  virtual int __fastcall GetCount();

public:
  /* virtual class method */ 
  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
  virtual Typinfo::PTypeInfo __fastcall GetItemType(const TMetaClass* vmt) { return __Get%ARRAY_TYPE%Info; }
  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
  virtual Typinfo::PTypeInfo __fastcall GetItemType(const TMetaClass* vmt) { return __typeinfo(%ARRAY_TYPE%); }
  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>

  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
  /* virtual class method */ 
  virtual TMetaClass* __fastcall GetItemClass(const TMetaClass* vmt) { return __classid(%ARRAY_TYPE%); }
  
  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
  /* virtual class method */  
  virtual int __fastcall GetItemSize(const TMetaClass* vmt) { return sizeof(%ARRAY_TYPE%); }
    
  virtual void * __fastcall GetItemRef(const int Index);
  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
  virtual void __fastcall SetItemRef(const int Index, void* Ref);
  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
  virtual void __fastcall Clear();
  virtual void __fastcall Delete(const int Index);
  virtual void __fastcall Resize(const int ElementCount);
  virtual void __fastcall Assign(Classes::TPersistent* iSource);
  virtual void __fastcall ReadComplex(TObject* ASerializer);
  virtual void __fastcall WriteComplex(TObject* ASerializer);
  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
  %ARRAY_TYPE%* __fastcall Add()/* overload */;
  int __fastcall Add(%ARRAY_TYPE%* Value)/* overload */;
  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
  int __fastcall Add(%ARRAY_TYPE% Value)/* overload */;
  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
  __property int Count = {read=GetCount, nodefault};
  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
  __property %ARRAY_TYPE%* Items[int Index] = {read=GetItems, write=SetItems/*, default*/};
  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
  __property %ARRAY_TYPE% Items[int Index] = {read=GetItems, write=SetItems/*, default*/};
  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
  __property %ARRAY_NAME%_%ARRAY_TYPE% InnerArray = {read=fItems, nodefault};
public:
  #pragma option push -w-inl
  /* TROArray.Destroy */ inline __fastcall virtual ~%ARRAY_NAME%() {}
  #pragma option pop

public:
  #pragma option push -w-inl
  /* TROComplexType.Create */ inline __fastcall virtual %ARRAY_NAME%()/* overload */ : Urotypes::TROArray() {}
  #pragma option pop
};

// <%%% END ARRAYS %%%>
// <%%% START EXCEPTIONS %%%>
// <%%% START DOCUMENTATION %%%>

/* Description:
    %CONTENT% */
// <%%% END DOCUMENTATION %%%>
class DELPHICLASS %EXCEPTION_NAME%;
class %EXCEPTION_NAME% : public %EXCEPTION_ANCESTOR_NAME%
{
  typedef %EXCEPTION_ANCESTOR_NAME% inherited;
  
private:
  // <%%% START FIELDS_NO_STRIP %%%>
  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
  %FIELD_TYPE% f%FIELD_NAME%;
  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
  %FIELD_TYPE%* f%FIELD_NAME%;
  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
  // <%%% END FIELDS_NO_STRIP %%%>
public:
  %EXCEPTION_NAME%(AnsiString anExceptionMessage
                   // <%%% START ANCESTOR_FIELDS %%%>
                   // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
                   , %FIELD_TYPE% a%FIELD_NAME% 
                   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
                   // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
                   , %FIELD_TYPE%* a%FIELD_NAME% 
                   // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
                   // <%%% END ANCESTOR_FIELDS %%%>
                   // <%%% START FIELDS_NO_STRIP %%%>
                   // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
                   , %FIELD_TYPE% a%FIELD_NAME% 
                   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
                   // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
                   , %FIELD_TYPE%* a%FIELD_NAME% 
                   // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
                   // <%%% END FIELDS_NO_STRIP %%%>
                   );
  // <%%% START IF_HAS_FIELDS %%%>
  virtual void __fastcall ReadException(TObject* ASerializer);
  virtual void __fastcall WriteException(TObject* ASerializer);
  // <%%% END IF_HAS_FIELDS %%%>
__published:
  // <%%% START FIELDS_NO_STRIP %%%>
  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
  __property %FIELD_TYPE% %FIELD_NAME% = {read=f%FIELD_NAME%, write=f%FIELD_NAME%}; 
  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
  __property %FIELD_TYPE%* %FIELD_NAME% = {read=f%FIELD_NAME%, write=f%FIELD_NAME%}; 
  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
  // <%%% END FIELDS_NO_STRIP %%%>
};

// <%%% END EXCEPTIONS %%%>
// <%%% START SERVICES %%%>
__interface I%SERVICE_NAME%;
typedef System::DelphiInterface<I%SERVICE_NAME%> _di_I%SERVICE_NAME%;
__interface INTERFACE_UUID("%SERVICE_UID%") I%SERVICE_NAME% : public %SERVICE_ANCESTOR_NAME%
{
public:
  // <%%% START FUNCTION_OPERATIONS %%%>
  // <%%% START IF_RESULT_SIMPLE %%%>
  virtual %OPERATION_RESULT% __fastcall %OPERATION_NAME%(
  // <%%% END IF_RESULT_SIMPLE %%%>
  // <%%% START IF_RESULT_COMPLEX %%%>
  virtual %OPERATION_RESULT%* __fastcall %OPERATION_NAME%(
  // <%%% END IF_RESULT_COMPLEX %%%>
    // <%%% START PARAMS %%%>
    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
    // <%%% END PARAMS %%%>
    ) = 0; // pure virtual function - interface only
  // <%%% END FUNCTION_OPERATIONS %%%>
  // <%%% START PROCEDURE_OPERATIONS %%%>
  virtual void __fastcall %OPERATION_NAME%(
    // <%%% START PARAMS %%%>
    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
    // <%%% END PARAMS %%%>
    ) = 0; // pure virtual function - interface only
  // <%%% END PROCEDURE_OPERATIONS %%%>
};

class DELPHICLASS T%SERVICE_NAME%_Proxy;
class T%SERVICE_NAME%_Proxy : public %SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%
{
  typedef %SERVICE_PROXY_ANCESTOR_NAME% inherited;
  
protected:
  virtual AnsiString __fastcall __GetInterfaceName()
    { return "%SERVICE_NAME%"; }

  // <%%% START FUNCTION_OPERATIONS %%%>
  // <%%% START IF_RESULT_SIMPLE %%%>
  virtual %OPERATION_RESULT% __fastcall %OPERATION_NAME%(
  // <%%% END IF_RESULT_SIMPLE %%%>
  // <%%% START IF_RESULT_COMPLEX %%%>
  virtual %OPERATION_RESULT%* __fastcall %OPERATION_NAME%(
  // <%%% END IF_RESULT_COMPLEX %%%>
    // <%%% START PARAMS %%%>
    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
    // <%%% END PARAMS %%%>
    );
  // <%%% END FUNCTION_OPERATIONS %%%>
  // <%%% START PROCEDURE_OPERATIONS %%%>
  virtual void __fastcall %OPERATION_NAME%(
    // <%%% START PARAMS %%%>
    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
    // <%%% END PARAMS %%%>
    );
  // <%%% END PROCEDURE_OPERATIONS %%%>
  
public:
  #pragma option push -w-inl
  /* TROProxy.Create */ inline __fastcall virtual T%SERVICE_NAME%_Proxy(const Uroclientintf::_di_IROMessage aMessage, const Uroclientintf::_di_IROTransportChannel aTransportChannel)/* overload */ :
    %SERVICE_PROXY_ANCESTOR_NAME%(aMessage, aTransportChannel) {}
  #pragma option pop
  
  virtual HRESULT __stdcall QueryInterface(const GUID& IID, void **Obj) {
    return inherited::QueryInterface(IID, (void *)Obj); }

  virtual ULONG __stdcall AddRef() {
    return inherited::_AddRef();  }

  virtual ULONG __stdcall Release() {
    return inherited::_Release(); }
};

// Co%SERVICE_NAME%
class DELPHICLASS Co%SERVICE_NAME%;
class Co%SERVICE_NAME% : public System::TObject
{
  typedef System::TObject inherited;

public:
  static _di_I%SERVICE_NAME% __fastcall Create(const Uroclientintf::_di_IROMessage aMessage,
                        Uroclientintf::_di_IROTransportChannel aTransportChannel)
  {
    _di_I%SERVICE_NAME% result;
    T%SERVICE_NAME%_Proxy* proxy = new T%SERVICE_NAME%_Proxy(aMessage, aTransportChannel);
    if (proxy->QueryInterface(I%SERVICE_NAME%_IID, reinterpret_cast<void**>(&result)) != S_OK)
    {
      delete proxy;
      throw EIntfCastError::EIntfCastError("I%SERVICE_NAME% not supported");
    }
    return result;
  };

  static _di_I%SERVICE_NAME% __fastcall Create(const Uroclient::TROMessage* aMessage,
                        Uroclient::TROTransportChannel *aTransportChannel)
  {
    _di_IROMessage __Message;
    _di_IROTransportChannel __TransportChannel;

    if (aMessage->GetInterface(__Message))
    {
      if (aTransportChannel->GetInterface(__TransportChannel))
        return Create(__Message, __TransportChannel);
      else
        throw EIntfCastError::EIntfCastError("IROTransportChannel not supported");
    }
    else
    {
      throw EIntfCastError::EIntfCastError("IROMessage not supported");
    }
  };
};

// <%%% END SERVICES %%%>
// <%%% START EVENT_SINKS %%%>
/* I%EVENT_SINK_NAME% */
// <%%% START DOCUMENTATION %%%>

/* Description:
    %CONTENT% */
// <%%% END DOCUMENTATION %%%>
__interface I%EVENT_SINK_NAME%;
typedef System::DelphiInterface<I%EVENT_SINK_NAME%> _di_I%EVENT_SINK_NAME%;
__interface INTERFACE_UUID("%EVENT_SINK_UID%") I%EVENT_SINK_NAME% : public %EVENT_SINK_ANCESTOR_NAME%
{
public:
  // <%%% START OPERATIONS %%%>
  virtual void __fastcall %OPERATION_NAME%(
    // <%%% START PARAMS %%%>
    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
    // <%%% END PARAMS %%%>
    ) = 0; // pure virtual function - interface only
  // <%%% END OPERATIONS %%%>
};

/* I%EVENT_SINK_NAME%_Writer */
// <%%% START DOCUMENTATION %%%>

/* Description:
    %CONTENT% */
// <%%% END DOCUMENTATION %%%>
__interface I%EVENT_SINK_NAME%_Writer;
typedef System::DelphiInterface<I%EVENT_SINK_NAME%_Writer> _di_I%EVENT_SINK_NAME%_Writer;
__interface INTERFACE_UUID("%EVENT_SINK_UID%") I%EVENT_SINK_NAME%_Writer : public I%EVENT_SINK_WRITER_ANCESTOR_NAME%
{
public:
  // <%%% START OPERATIONS %%%>
  virtual void __fastcall %OPERATION_NAME%(GUID __Sender 
    // <%%% START PARAMS %%%>
    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
    , %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%
    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
    , %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%
    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
    // <%%% END PARAMS %%%>
    ) = 0; // pure virtual function - interface only
  // <%%% END OPERATIONS %%%>
};

// <%%% END EVENT_SINKS %%%>
}  // namespace %NAMESPACE_NAME%

using namespace %NAMESPACE_NAME%;
#pragma pack(pop)
#pragma option pop

#pragma delphiheader end.
#endif  // %UNIT_NAME%_H