ISinkIID

(Available in 01 TS COM - TS_COM_ISink)

Purpose

Get the IID of the enclosed interface.

Syntax

? TS_GUID2String( oDelegateIUnknown:IID )

Description

Get the ( main ) IID of the enclosed interface. The IID ( Interface ID ) is used by COM to identify interfaces. The returned IID can be seen as the classname of the interface. See also IIDAdd and IIDDel.

Returns

POINTER, IID as WinGUID

Example

IF TS_IsEqualGUID( oDelegateIUnknown:IID, TS_GUID_IDispatch( ) )
// Use the 'IDispatch' interface of the interface
ELSE
TSTrace Warning "This interface dous not support 'IDispatch'"
END

Source

ACCESS ISinkIID AS _WinGUID PASCAL CLASS TS_ISink
LOCAL oCOMGlobalData AS _TS_COMGlobalData
LOCAL pStruGUID AS _WinGUID
   oCOMGlobalData:=_TS_ModuleGetCOMGlobalData( )
   #IFDEF TS_COMGLOBALDATA_CRITICALSECTION
      EnterCriticalSection( oCOMGlobalData:_COMGGeneralPurposeSection )
   #ENDIF
   pStruGUID:=SELF:_IID
   #IFDEF TS_COMGLOBALDATA_CRITICALSECTION
      LeaveCriticalSection( oCOMGlobalData:_COMGGeneralPurposeSection )
   #ENDIF
   TSTrace Leave
RETURN pStruGUID