So sieht die Interface-Deklaration aus:
Delphi-Quellcode:
{$EXTERNALSYM ISharedBitmap}
ISharedBitmap = interface(IUnknown)
['{091162a4-bc96-411f-aae8-c5122cd03363}']
function GetSharedBitmap(out phbm: HBITMAP): HRESULT; stdcall;
function GetSize(out pSize: TSize): HRESULT; stdcall;
function GetFormat(out pat: WTS_ALPHATYPE): HRESULT; stdcall;
function InitializeBitmap(hbm: HBITMAP; wtsAT: WTS_ALPHATYPE): HRESULT;
stdcall;
function Detach(out phbm: HBITMAP): HRESULT; stdcall;
end;