- Recompilación en Delphi10 de todos los paquetes de RO para generar las DCU's en Lib\D10 - Recompilación en Delphi10 de todos los paquetes de DA para generar las DCU's en Lib\D10 git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.RemObjects@9 b6239004-a887-0f4b-9937-50029ccdca16
88 lines
3.4 KiB
C++
88 lines
3.4 KiB
C++
// <%%% START SERVICES %%%>
|
|
// unit %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 your project. }
|
|
{ }
|
|
{ Modify the %UNIT_NAME%.cpp file to change the implementation details of }
|
|
{ this service. }
|
|
{---------------------------------------------------------------------------*/
|
|
|
|
#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 <uROServer.hpp> // Pascal unit
|
|
// <%%% START IF_DATA_MODULE %%%>
|
|
#include <uRORemoteDataModule.hpp> // Pascal unit
|
|
// <%%% END IF_DATA_MODULE %%%>
|
|
#include "%LIBRARY_NAME%_intf.h"
|
|
|
|
namespace %NAMESPACE_NAME%
|
|
{
|
|
// T%SERVICE_NAME%
|
|
class DELPHICLASS T%SERVICE_NAME%;
|
|
class T%SERVICE_NAME% : public %SERVICE_ANCESTOR_NAME%, I%SERVICE_NAME% // implements I%SERVICE_NAME%
|
|
{
|
|
typedef %SERVICE_ANCESTOR_NAME% inherited;
|
|
|
|
protected:
|
|
// I%SERVICE_NAME% methods
|
|
// <%%% 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:
|
|
// <%%% START IF_DATA_MODULE %%%>
|
|
__fastcall T%SERVICE_NAME%(Classes::TComponent* aOwner);
|
|
|
|
// <%%% END IF_DATA_MODULE %%%>
|
|
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(); }
|
|
};
|
|
|
|
} // namespace %NAMESPACE_NAME%
|
|
#endif // %UNIT_NAME%_H
|
|
|