OnClose-Ereignis eines Word-Dokumentes abfangen?

[mjenke]

Guten Morgen, alle miteinander!

Vielleicht kann mir jemand bei folgendem Problem helfen. Ich schreibe derzeit für meine Firma ein Word-AddIn (DLL). Jetzt stehe ich vor einem Problem, bei dem ich noch nicht genau weiß, wie ich es lösen soll:

Wie kann man beim Erzeugen oder Öffnen eines Dokumentes in Word einen MessageHandler auf das OnClose-Ereignis dieses Dokumentes setzen? Folgender Code funktioniert NICHT:

Deklaration des MessageHandlers:

procedure MsgHandle_DocumentClose ( Sender: TObject ); Implementierung im DocumentOpen-Handler, der bereits mit der Word-Application verbunden ist

Delphi-Quellcode:

procedure TXConMag.MsgHandle_DocumentOpen(Sender: TObject;
  var Doc: OleVariant);
begin
  TWordDocument(WordApp.Documents.Item(Doc)).OnClose := MsgHandle_DocumentClose;
end;

Ebensowenig kann ich einfach

Doc.OnClose := MsgHandle_DocumentClose; benutzen, da ich dann die Fehlermeldung bekomme, dass das Automatisierungs-Objekt diese Funktion nicht unterstütze...



Matthias