我正在尝试使用以下代码(Delphi)获取全局接口表:
uses Comobj, ActiveX;
var
cGIT : IGlobalInterfaceTable = NIL;
const
CLSID_StdGlobalInterfaceTable: TGUID = '{00000146-0000-0000-C000-000000000046}';
function GIT : IGlobalInterfaceTable;
begin
if (cGIT = NIL) then
OleCheck (CoCreateInstance (CLSID_StdGlobalInterfaceTable, NIL,
CLSCTX_ALL, IGlobalInterfaceTable, cGIT ));
Result := cGIT;
end;
Run Code Online (Sandbox Code Playgroud)
但是,CoCreateInstance会抛出"未注册类"异常.事实上:在HKCR/CLSID中,{00000146-等没有条目.
应该注册哪个dll或ocx才能在注册表中获得此定义?或者我完全错了吗?