[Lazarus-es] Implementar PascalMock

José Mejuto joshyfun en gmail.com
Vie Jun 20 20:55:51 CEST 2014


El 20/06/2014 20:33, francisco prieto escribió:

> TNoRefCountObject =  class(TObject, IInterface)
>    protected
>      function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
        function QueryInterface(constREF IID: TGUID; out Obj): HResult; 
stdcall;
>      function _AddRef: Integer; stdcall;
>      function _Release: Integer; stdcall;
>    end;
>

Esa es una diferencia con Delphi, al ser Delphi "Windows Only".

-- 





More information about the Lazarus-es mailing list