Kannst es auch so machen wenn du die datei kopieen willst und zwingend mit OpenDial arbeitest.
Delphi-Quellcode:
OpenDialog1.Execute;
OpenDialog1.Files.LoadFromFile(OpenDialog1.FileName);
OpenDialog1.Files.SaveToFile('test.txt');
Die Datei Test.txt erscheint in dem Ordner wo du andere geladen hast, musst halt nur vorher den Pfad angeben wo sie hinsoll dann is das Prob auch gelößt.
Und wenn du den Pfad deiner eigenden exe willst dann so
Delphi-Quellcode:
var
strg: String;
begin
strg := extractfilepath(application.exename);
//oder
strg := extractfilepath(paramstr(0));
end;