Zip erstellen über Shell API

[paperboy]

hey ConstantGardener,

Erstmal vorweg:
Mich wundert das es sich für dich überhaupt so kompilieren lässt.. da wird doch ein MemoryStream und die Funktion FileExists verwendet?!
Also ich musste noch die Classes und SysUtils Units einbinden damit das Ding überhaupt anstandslos kompiliert wird

Danach hab ich aber keine Probleme beim erstellen von zip Dateien... Naja bis auf die Tatsache das sich mein Testapp aufgrund der Schleife

Delphi-Quellcode:

while NumProcessThreads <> numt do
begin
  sleep(100);
end;

bei einigen Archiven aufhängt...

Beim entpacken in einen Ordner gibt es bei mir nur Probleme wenn der Ordner nicht vorhanden ist...

Wo genau kracht es denn bei dir?