Hallo,
ich habe im Easy Helper folgendes gefunden:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var
mem : TMemoryStream;
FilePathA, FilePathB : String;
begin
FilePathA := Edit1.Text; // Pfad der zu kopierenden Datei
FilePathB := Edit2.Text; // Zielpfad
mem := TMemoryStream.Create;
try
mem.LoadFromFile(filePathA);
mem.SaveToFile(FilepathB);
finally
mem.Free;
end;
end;
Das hab ich so umgeschrieben, das eine bestimmte Datei kopiert wird, ich möchte aber, das die ins Windows Verzeichniss kommt, mit %WinDir% lief es leider nicht
