Delphi-Quellcode:
Function WinDowsDir: String;
...
procedure TForm1.Button15Click(Sender: TObject);
var
mem : TMemoryStream;
FilePathA, FilePathB : String;
begin
FilePathA := 'C:\test.exe'; // Pfad der zu kopierenden Datei
FilePathB := WindowsDir + 'NEUETEST.exe'; // Zielpfad
mem := TMemoryStream.Create;
try
mem.LoadFromFile(filePathA);
mem.SaveToFile(FilepathB);
finally
mem.Free;
end;
Da WindowsDir eine Funktion ist, darfst du sie nicht als String schreiben (in den ''-Zeichen). Außerdem - WindowsDir muss ja nicht auf C: sein.
Aber wie The-X geschrieben hat, für den "Hausgebrauch"
reicht auch CopyFile.
Gruß,
ManuMF