eigenes programm in anderen ordner kopieren

[pacman1986]

Delphi-Quellcode:

var test : boolean;
begin
 test := copyfile(PCHAR('C:\1.txt'),PCHAR('c:\aha\1.txt'),false);
 If test 
    then //kein fehler 
    else //fehler nicht geklappt;
end;