IMAPI2 - Wie weise ich die EventHandler zu?

[DeddyH]

Ich gebe zu, dass meine COM-Kenntnisse recht begrenzt sind. Im Moment beiße ich mir die Zähne an den IMAPI2-Interfaces aus. Ich bin zwar in der Lage, eine Daten-DVD zu brennen, aber wie komme ich an die Events? Diese sind ja selbst Interfaces, muss ich mir da jeweils eine eigene Klasse schreiben, die das entsprechende Interface implementiert? Und wenn ja, wie weise ich diese dann dem korrespondierenden Interface zu? Ich habe da ein Beispiel in C++ gefunden, da wird dann irgendwie mit CreateEventSink hantiert, aber das war mir leider etwas zu hoch.

Ideen sind herzlich willkommen.

[himitsu]

Am Einfachsten du lädst dir erstmal das Win32-SDK runter, denn da sind die "echten" Deklarationen drin zu finden.
Oder du nimmst dir das aus den Header-Files von Dritten (C++ lässt sich da meistens am Einfachsten übersetzen.
Manchmal/oftmals steht auch etwas in den Kommentaren, weil vielen Anderen auch etwas im MSDN fehlt (und sie keine Lust haben das im SDK zu suchen, obwohl in den Requirements fast immer erwähnt wird wo man im SDK was findet > Headerfile .h, DLL-Name oder hier die IDL)
Oder Delphi > Komponente > Komponente importieren > Typlib > nach "IMAPI" suchen.

Und ja, wenn als Callback ein Interface übergeben werden soll, dann mußt du dafür ein Objekt (Klasse) implementieren.
https://msdn.microsoft.com/en-us/lib.../aa364831.aspx

Im MSDN findet man zwar die Deklarationen der Methoden, aber die GUID (IID) der Interfaces steht da fast nie, auch kann es sein, dass das MSDN die Methoden in alphabetischer Reihenfolge auflistet, aber COM-Interface-Methoden sind indiziert und da kommt es auf die richtige Reihenfolge drauf an, bzw. die explizite Angabe der DispID.

Beispiel: https://msdn.microsoft.com/en-us/lib...(v=vs.85).aspx
Du brauchst also erstmal die Interface-Deklaration dafür (siehe IID_DDiscMaster2Events {27354131-7F64-5B0F-8F00-5D77AFBE261E}),
dann die Implementation, also die Delphi-Klasse dahinter, welche dieses Interface implementiert,
dann davon eine "Interface"-Instanz erstellen und an die "Registerfunktion" übergeben. (IConnectionPointContainer)

[DeddyH]

Jemand war bereits so nett und hat die entsprechenden Typelibs importiert: http://lists.freepascal.org/pipermai...er/042935.html, mit den dort enthaltenen IMAP2.pas und IMAPI2FS.pas arbeite ich, funktioniert wie gesagt auch hervorragend. Aber wo finde ich nun den IConnectionPointContainer, um die Verknüpfung herzustellen? Im VBScript-Beispiel von Microsoft wird ConnectObject aufgerufen, dazu bräuchte ich ein Pendant, finde aber nix. Kompliziertes Gedöns, das.

[himitsu]

Zitat von DeddyH:

finde aber nix. Kompliziertes Gedöns, das.

Ich auch nicht.
Hatte versucht das in einem C#-Code zu erkennen, aber zwischen all den .NET-Win32-Wrappern war fast nix zu erkennen.

Microsoft hat einen geheimen Vertrag mit der Speicherchips-/Festplattenindustrie, um den Zugang zu DVDs zu erschweren und die Leute zum Kauf von SSD/HDD zu verleiten.
Aber pssssssssst, davon weiß keiner was.

[DeddyH]

Ich vermute, Du meinst das CodeProject-Beispiel, das gibt es auch in C++: https://www.codeproject.com/Articles...-Mastering-API. Und da habe ich eben den CreateEventSink-Aufruf gefunden, mit dem ich nichts anfangen kann.

[DeddyH]

Nach weiterer Recherche scheint es so, als sei InterfaceConnect das, was ich suche. Nur, wie muss ich meine Klasse dann deklarieren, als TInterfacedObject, das das entsprechende Event-Interface (z.B. DDiscMaster2Events) und damit auch IDispatch implementiert? Zumindest habe ich es eben so versucht, hat aber nichts gebracht, der Code kompiliert zwar, aber die Events kommen nicht an. Nach weiterer Lektüre (http://www.blong.com/Conferences/ICo...phi.htm#Events) verliere ich langsam die Lust, geht es nicht ein bisschen komplizierter?