Преглед изворни кода

* 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;