WinApi функция IsEqualIID
Описание
function IsEqualIID(const iid1, iid2: TIID): Boolean;
Проверяет, соответствует ли идентификатор интерфейса iid1 идентификатору интерфейса iid2. Это часто необходимо для проверки соответствия интерфейса классу интерфейса.
Параметры:
iid1: Идентификатор первого интерфейса.
iid2: Идентификатор второго интерфейса.
Возвpащаемое значение:
True если идентификаторы равны и False в противном случае.
Пример:
function IMyUnknown.QueryInterface(const WantedIID: TIID;var ReturnObject): HResult;
VAR P : IUnknown;
begin
If IsEqualIID(WantedIID, IID_IUnknown) THEN P := Self
ELSE P:= nil;
Pointer(ReturnObject) := P;
IF P = NIL THEN Result := E_NOINTERFACE
ELSE
begin
P.AddRef;
Result := S_OK;
end;
end;
Материал взят из:
Русская спpавка по Windows API