Dateien Kopieren (Ins WinDir)

[ManuMF]

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