求一行C代码翻译成delphi代码!多谢!

求一行C代码翻译成delphi代码!!谢谢!!这部分已经改成delphi了ProcessUrlAction(pwszUrl: PWideChar dwAct

求一行C代码翻译成delphi代码!!谢谢!!
这部分已经改成delphi了
ProcessUrlAction(pwszUrl: PWideChar; dwAction: Cardinal; pPolicy: Pointer; cbPolicy: Cardinal; pContext: Pointer; cbContext, dwFlags, dwReserved: Cardinal): HRESULT


帮忙下面这行代码翻译成delphi

IsEqualIID(*(CLSID *) pContext, CLSID_CDefViewOC)
 






.
[解决办法]
type PCLSID = ^CLSID end;

IsEqualIID((PCLSID(pContext))^, CLSID_CDefViewOC)