Delphi-PRAXiS - Word Speicherpfad einstellen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)

- - Word Speicherpfad einstellen (https://www.delphipraxis.net/100260-word-speicherpfad-einstellen.html)

Word Speicherpfad einstellen

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.

Delphi-Quellcode:

Word.ActiveDocument.SaveAs('...')

ist nicht das richtige.
Kann niemand helfen?

Re: Word Speicherpfad einstellen

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