AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Parameterübergabe von einer COM-DLL über Eventsink Invokes
Thema durchsuchen
Ansicht
Themen-Optionen

Parameterübergabe von einer COM-DLL über Eventsink Invokes

Ein Thema von BugTrapper · begonnen am 25. Nov 2013
Antwort Antwort
BugTrapper

Registriert seit: 25. Nov 2013
Ort: bei Hannover
2 Beiträge
 
Delphi 10.1 Berlin Professional
 
#1

Parameterübergabe von einer COM-DLL über Eventsink Invokes

  Alt 25. Nov 2013, 10:27
Hallo,
ich finde nichts im Internet.

Wie kriegt man Übergabeparameter aus COM-Event-Prozeduren aus dem allgemeinen
Pointer VarResult wieder heraus ?

Zum Beispiel:

function TEventSink.Invoke(DispID: integer; const IID: TGUID; LocaleID: integer; Flags: Word; var Params; VarResult,ExcepInfo,ArgErrointer): HResult;
var
m_pPacket : IDMPacket;

begin
Result := S_OK;
case DispID of
1: m_pPacket:=VarResult^;
FController.OnDMCompleted(m_pPacket);
end;
end;

Den obigen EventSink.Invoke kriege ich von einer COM-DLL, es wird mir aber auch ein Parameter übergeben, den ich vermutlich in VarResult als Pointer zurückbekomme.
Diesen Pointer kann ich aber nicht in meine Struktur IDMPacket casten, da kriege ich immer nen Compiler-Fehler.

Ich habe schon das halbe Internet durchsucht, weiss vielleicht jemand, wie man den Pointer VarResult wieder so umwandeln kann, dass er auf meine Struktur IDMPacket
zeigt ??

Wie kriegt man Parameter aus Invoke zurück, so dass man darauf zugreifen kann ?

Wie kriegt man so was hin ??

Vielen Dank im voraus
M. Külshammer
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:29 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz