Datei verschieben/kopieren

[d3g]

Hallo Thomas,

zum Verschieben kannst du auch ganz einfach RenameFile() aus der SysUtils verwenden:

Code:

function MoveAFile(FromPos, ToPos: String): Boolean;
begin
  if (ToPos[Length(ToPos)] <> '\') then
    ToPos := ToPos + '\';

  Result := RenameFile(FromPos, ToPos + ExtractFileName(FromPos));
end;

MfG,
d3g