Moin moin,
also dann stimmt wohl irgendwas mit deiner
ActiveX Unit nicht, bzw. IEnumUnknown ist noch irgendwo anners deklariert
Wo springt Delphi hin, wenn du
mit der Mause auf IEnumUnknown klickst und dabei [STRG] gedrückt hälst?
Es sollte die
Unit ActiveX aufgehen und der Cursor sollte an die Stelle springen:
Delphi-Quellcode:
{$EXTERNALSYM IEnumUnknown}
IEnumUnknown = interface(IUnknown)
['{00000100-0000-0000-C000-000000000046}']
function Next(celt: Longint; out elt;
pceltFetched: PLongint): HResult; stdcall;
function Skip(celt: Longint): HResult; stdcall;
function Reset: HResult; stdcall;
function Clone(out enm: IEnumUnknown): HResult; stdcall;
end;
Du könntest enumUnk auch mal so deklarieren:
enumUnk : ActiveX.IEnumUnknown;
Ansonsten hab ich im Moment keine weiteren Ideen woran es liegen könnte...