![]() |
IEnumFORMATETC exakte Deklaration?
Hallo,
Ich möchte ein Projekt von Freepascal nach Delphi portieren und hier:
Delphi-Quellcode:
wie im Kommentar gesagt, erhalte ich die Fehlermeldung das sich die Deklaration der beiden Funktionen []bNext[/b] und Skip von der Deklaration im Interface unterscheidet?
TfpgOLEEnumFormatEtc = class(TInterfacedObject, IEnumFORMATETC)
private FFormatEtcList: TfpgOLEFormatEtcList; FIndex: Integer; protected { IEnumFORMATETC } // Bei diesen beiden Funktionen kommt der Compiler nicht weiter function Next(celt: Longint; var elt:FormatEtc; pceltFetched: PLongint=nil): HResult; stdcall; function Skip(celt: Longint): HResult; stdcall; function Reset: HResult; stdcall; function Clone(out Enum: IEnumFormatEtc): HResult; stdcall; public constructor Create(AFormatEtcList: TfpgOLEFormatEtcList); destructor Destroy; override; end; Ich habe unter Google unter IEnumFORMATETC delphi gesucht, auch das Wort Delphi vor den Interfacebezeichner nichts gefunden. Wo finde ich die exakte Deklaration dieses Interfaces? Habe die VCL Quelltexte nicht auf meinem derzeitigen Rechner. |
AW: IEnumFORMATETC exakte Deklaration?
Delphi-Quellcode:
Die Deklaration kann in einer anderen Delphi Version leicht unterschiedlich aussehen.
// Delphi 5 - Unit ActiveX
IEnumFORMATETC = interface(IUnknown) ['{00000103-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 Enum: IEnumFormatEtc): HResult; stdcall; end; Bitte deine Delphi Version in deinem Profil hinterlegen. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 15:37 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz