paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-16 14:20:05 +02:00
Code Issues Packages Projects Releases Wiki Activity

* out x:i<interfacetype> to out x; otherwise passing olevariants doesn't work.

Browse Source 
git-svn-id: trunk@13254 -
This commit is contained in:
marco 2009-06-10 13:50:27 +00:00
parent 538f82091a
commit 4a2acd9d87
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/winunits-base/src/activex.pp
View File

@ -2036,7 +2036,7 @@ TYPE
IEnumUnknown = Interface(IUnknown)
['{00000100-0000-0000-C000-000000000046}']
// pointer_default(unique)
Function Next(Celt:Ulong;out rgelt:IUnknown;out pCeltFetched:pulong):HRESULT;StdCall;
Function Next(Celt:Ulong;out rgelt;out pCeltFetched:pulong):HRESULT;StdCall;
// 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;