nichts für ungut, aber ein Programm das eine Datei einfach so wo ganz anders erzeugt und da speichert ist Problematisch und unschön
Delphi-Quellcode:
var Pfad:String;
begin
Pfad := extractfilepath(paramstr(0));
..
end;
bau das bitte in dein Programm ein.