Entpackte Dateien mit Abbrevia

[Victor]

Hallo,

versuche die Dateien aus einer Zip-Dateien zu entpacken und später, beim "Aufräumen", diese zu löschen.
Benutze dafür Abbrevia 10.6 von TurboPack (GetIt) mit Delphi 10.4:

Delphi-Quellcode:

UnZipper := TAbUnZipper.Create(self);
UnZipper.BaseDirectory := gWorkingDir;
UnZipper.OpenArchive(zipFileName);

TracksElements := UnZipper.Count;
setLength(Tracks, TracksElements);
for TrackCnt := 0 to TracksElements -1
    do begin
    Tracks[TrackCnt].FileToPlay := gWorkingDir + PathDelim + UnZipper.Items[TrackCnt].FileName;
    end;

UnZipper.ExtractFiles('*.*');
UnZipper.CloseArchive;
UnZipper.Free;

Nach den Verwendung der entpackten Dateien möchte ich diese löschen.
Leider können "System.SysUtils.deleteFile" oder "System.Erase" diese Dateien nicht löschen.

Kennt jemand dieses Verhalten oder eventuell einen Workaround?
Danke.