Thema: Delphi WordApplication

Einzelnen Beitrag anzeigen

Delphi-Coder

Registriert seit: 8. Jan 2003
Ort: Greifswald / Stralsund
151 Beiträge
 
Delphi 7 Enterprise
 
#4
  Alt 12. Jan 2003, 13:05
Hallo,

ich hab das Problem jetzt (fast) gelöst! In meinem Programm steht jetzt ein zusätzlicher Button zur Verfügung, über den Word geschlossen werden muss! Mit diesem Button wird Word geschlossen ohne die Änderungen zu speichern...

Delphi-Quellcode:
procedure TPersonendaten.BitBtn3Click(Sender: TObject);
var SaveChanges, OriginalFormat, RouteDocument: OleVariant;
begin
  SaveChanges := WdDoNotSaveChanges;
  OriginalFormat := UnAssigned;
  RouteDocument := UnAssigned;

  WordApplication1.Quit(SaveChanges, OriginalFormat, RouteDocument);
  WordApplication1.Disconnect;
end;
Das ist natürlich ne ziemlich unsaubere Lösung, da der Benutzer Word ja immernoch selber schließen kann und dann beim nächsten Öffnen ein Fehler erscheint!

Gibt es keine Möglichkeit das Schließen durch den Benutzer zu verhindern, oder wenigstens abzufangen um dann wieder den oben stehenden Code auszuführen???

Vielen Dank!


Delphi-Coder
  Mit Zitat antworten Zitat