[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