Allgemeine Pfadangabe unter Delphi

[Ykcim]

Hi,
vielleicht bin ich auch nur zu doof es zu verstehen.

Wenn ich DIr mein Programm geben würde, dann würde ich die Datei Main.dot in dem Progammordner speichern. z.B.: C:\Programme\Test
Die Pfadangabe im Programmcode für die Main.dot wäre also: C:\Programme\Tets\Main.dot
Wenn Du das Programm aber woanders speicherst z.B.: D:\Anwendungen\Test dann funktioniert mein Programm ja nicht mehr, denn die Pfadangabe müsste lauten D:\Anwendungen\Test\Main.dot

Und deshalb kann ich den Dateipfad nicht so angeben.

Habe hier mal den kompletten Code der Procedure kopiert...

Delphi-Quellcode:

procedure TForm1.BerichtNeuClick(Sender: TObject);
var
Template: OleVariant;
begin
Template:=('D:\Privat\Software Entwicklung\Main.dot');
if wordapplication1.Visible=true then
WordDocument1.ConnectTo(WordApplication1.ActiveDocument)
else
wordapplication1.Connect;
wordapplication1.Visible:=true;
wordapplication1.Documents.Add(Template,EmptyParam,EmptyParam,EmptyParam);
end;

Aber an dieser Stelle nochmal: Ich bin ein Newby und vielleicht nur zu doof die Antwort zu verstehen!

Vielen Dank