(Moderator)
Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.867 Beiträge
Delphi 11 Alexandria
|
Re: Kopieren bzw verschieben von dateien
1. Mai 2009, 12:36
ParamStr(0) enthält den Dateinamen inklusive Pfad!
Und mit ExtractFilePath() kannst du daraus den Pfad extrahieren!
Also wie geschrieben:
Path := ExtractFilePath( ParamStr(0));
liegt die Exe auf C:\Programme und Einstellungen\Mein Programm und heist Project1.exe
steht in ParamStr(0) C:\Programme und Einstellungen\Mein Programm\Project1.exe
und in Path dann nur der Pfad inklusive Backslash (C:\Programme und Einstellungen\Mein Programm\)
Markus Kinzler
|