Problem nach dem entpacken einer Zip Datei

[Peter60]

Hallo ich habe folgendes Problem ich habe eine Zip-Datei einpackt und möchte eine enpackte Datei umbennen. Aber ich bekomme keinen Zugriff auf diese Datei und kann dies Datei daher nicht umbennen.
Vieleicht hat jemand eine Tipp für micht

Code Ausschnitt

Delphi-Quellcode:

if FileExists('xyz.zip') then
begin
   // Daten entpacken
   archiver := TZipMaster19.Create(self);
   try
     with archiver do
     begin
       FSpecArgs.Clear;
       ZipFilename := 'xyz.zip';
       ExtrBaseDir := myDir;
       Extract;
     end;
     archiver.Free;
   except
    archiver.Free;
    Exit;
   end;
   IF RenameFile(myDir + 'FERTIG.DAT', myDir + 'STOP.DAT') then // gibt ständig false
   begin
     // tu irgendwas
   end;
end;