谁能帮忙翻译:
function CreateObject(const ClassID: TGUID): IDispatch;
var
Unk: IUnknown;
begin
CoCreateInstance(ClassID, nil, CLSCTX_INPROC_SERVER, IUnknown, Unk);
Result := Unk as IDispatch;
end;
...全文
1515打赏收藏
简单的delphi函数翻译成C++Builder
谁能帮忙翻译: function CreateObject(const ClassID: TGUID): IDispatch; var Unk: IUnknown; begin CoCreateInstance(ClassID, nil, CLSCTX_INPROC_SERVER, IUnknown, Unk); Result := Unk as IDispatch; end;