浏览代码

* Fix "Close" to "Clone" typo in IEnumUnknown

n7800 1 天之前
父节点
当前提交
ae4002ae06
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/winunits-base/src/activex.pp

+ 1 - 1
packages/winunits-base/src/activex.pp

@@ -2541,7 +2541,7 @@ TYPE
 //    HRESULT RemoteNext(        [in] ULONG celt,        [out, size_is(celt), length_is( *pceltFetched)]        IUnknown **rgelt,        [out] ULONG *pceltFetched);
      Function Skip(Celt:Ulong):HResult;StdCall;
      Function Reset():HResult; stdcall;
-     Function Close(Out ppenum: IEnumUnknown):HResult; stdcall;
+     Function Clone(Out ppenum: IEnumUnknown):HResult; stdcall;
      END;