CComQIPtr in Delphi

[Sherlock]

Hallo zusammen,
ist jemandem hier die ATL-Klasse CComqiPtr geläufig? Gibt es dieses oder etwas ähnliches auch in Delphi?

In C++ bzw. ATL sieht die Verwendung zum Beispiel so aus.

SetParams(
  long Group, BSTR , IDispatch* , IDispatch** ppDataAccessor, VARIANT_BOOL* vbSuccess)

...

CComQIPtr<IDataAccessor> ptrDataAccessor;
ptrDataAccessor = *ppDataSource;

http://msdn2.microsoft.com/en-us/lib...xw(VS.80).aspx

Es fehlt mir nun ein Pendant in Delphi, daß es mir ermöglicht, aus einem IDispatch ein Objekt mit der gewünschten Schnittstelle zurückliefert, sofern das Objekt die Schnittstelle unterstützt.

Ich hab im INet bisher nur Leidensgenossen gefunden, die ebenso auf der Suche sind...eventuell ist hier ein Guru unterwegs (Bernd Schulz anguck), der sowas aus dem Ärmel schütteln kann.

Danke im Voraus,

Sherlock

[Sherlock]

Ich deute das mal als belehrendes Schweigen.



CComQIPtr braucht man in Delphi nicht wirklich. Man hat ja QueryInterface.

Damit geht alles wie gewünscht.

Sherlock

[Bernhard Geyer]

So einen "schmarn" braucht man in Delphi nicht. Ist nur für C++ nötig damit man nicht gefahr läuft alle 5 Zeilen Ressourcenlücken wegen der Verwendung von COM-Interfaces zu provozieren (glaub ich jedenfalls bei Smart-Pointer verstanden zu haben).