OnClose-Ereignis eines Word-Dokumentes abfangen?

[mjenke]

Hallo, an alle!

Habe das Problem mit dem OnClose-Ereignis gerade gelöst:

Für jedes Dokument, das in Word erzeugt oder geöffnet wird, wird ohnehin von mir eine Umgebung angelegt (Objekt). Innerhalb dieser Umgebung habe ich ein Feld "FWordDok" eingefügt, das vom Typ TWordDocument ist.

Wenn ich im Create meiner Umgebung folgenden Code einfüge:

Delphi-Quellcode:

constructor TEnv.Create(Dok: _Document; Word: PWordApplication; EventButton: TOfficeButtonClickEvent;
                        EventDok: TNotifyEvent);
begin
  FOfficeButtonClass := TSimpleOfficeButton;
  FEvent             := EventButton;
  FDok               := Dok;
[...]
  // WordDokument vorbereiten
  FWordDok           := TWordDocument.Create ( nil );
  FWordDok.ConnectTo (Dok as Word_TLB._Document);
  FWordDok.OnClose   := EventDok;
end;

habe ich eine Verbindung zwischen meinem Feld "FWordDok" und dem eigentlichen Dokument hergestellt. In das OnClose des TWordDocument kann ich mein NotifyEvent eintragen, und das Ereignis ist abgefangen!