TWordApplication - wie beim Schliessen erkennen ob ein Dokument verändert wurde?

**rdeutsch**

Hallo

Im untenstehenden Code wird dem Event OnDocumentBeforeClose eine entsprechende Procedure WordBeforeClose zugewiesen. In dieser möchte ich - falls der Benutzer das Dokument verändert hat - eine Möglichkeit zum Speichern anbieten.
Wenn das Dokument nicht verändert wurde, dann soll Word ohne weitere Meldung geschlossen werden.

Wie kann man erkennen, ob ein Worddokument verändert wurde?
Meine bisherige Suche blieb leider erfolglos.

markieren

Delphi-Quellcode:

			  wordApp := TWordApplication.Create(self);

  wordApp.Documents.Open(docFilename, EmptyParam, false, EmptyParam,

                         EmptyParam, EmptyParam, EmptyParam, EmptyParam,

                         EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam);

  wordApp.Visible := true;

  wordApp.Activate;

  wordApp.ScreenUpdating := true;

  wordApp.OnDocumentBeforeClose := WordBeforeClose;

Danke für die Hilfe.
Grüsse, Robert

TWordApplication - wie beim Schliessen erkennen ob ein Dokument verändert wurde?

TWordApplication - wie beim Schliessen erkennen ob ein Dokument verändert wurde?

Forumregeln