Word Speicherpfad einstellen

[Rolf Rostig]

Hallo,
mithilfe von OLE wird eine Word-Vorlage geöffnet.
Wenn der Benutzer in Word auf speichern drückt soll der Pfad voreingestellt sein. Das heißt abweichend vom Standard-Pfad.
Leider kann ich keine Ahnung wie die Anweisung heißen könnte.

Word.ActiveDocument.SaveAs('...') ist nicht das richtige.
Kann niemand helfen?

[muenster]

Hi,

der Datenpfad muss explizit gesetzt werden:

Delphi-Quellcode:

procedure TForm1.WordDateiSpeichern();
var
  FileName,FileFormat,LockComments,Password,AddToRecentFiles,
  WritePassword,ReadOnlyRecommended,EmbedTrueTypeFonts,
  SaveNativePictureFormat,SaveFormsData,SaveAsAOCELetter : OleVariant;
begin
  WordApplication.ChangeFileOpenDirectory('C:\Daten\Test\');
  FileName := 'Testform';
  LockComments := False;
  Password := EmptyParam;
  AddToRecentFiles := True;
  WritePassword := EmptyParam;
  ReadOnlyRecommended := False;
  EmbedTrueTypeFonts :=False;
  SaveNativePictureFormat := False;
  SaveFormsData := False;
  SaveAsAOCELetter := False;
  WordApplication.ActiveDocument.SaveAs(FileName, FileFormat, LockComments, Password, AddToRecentFiles, WritePassword,
               ReadOnlyRecommended, EmbedTrueTypeFonts, SaveNativePictureFormat, SaveFormsData, SaveAsAOCELetter);
end;

Beispiel ist für Office 2000