Datei vom Temp-Verzeichnis kopieren zeigt Schloss-Symbol

[LTE5]

Zitat:

Wir hatten auch solche Probleme und haben das, wie du, mittels copy und delete gelöst.

Meine Lösung

Delphi-Quellcode:

function MoveFile(const FileFrom, FileTo: string): Boolean;
begin
 Result := False;
 if not FileExists(FileFrom) then
  Exit;

 if CopyFile(PWideChar(FileFrom), PWideChar(FileTo), False) then
  Result := System.SysUtils.DeleteFile(FileFrom);
end;

if MoveFile(A, B) then
 begin
  showmessage('Datei verschoben');
 end;