Winzip library

Thema durchsuchen

Ansicht

Themen-Optionen

Ein Thema von Lillebrohr · begonnen am 17. Jul 2003 · letzter Beitrag vom 26. Sep 2005

Vorheriger Beitrag

Nächster Beitrag

japetos

Registriert seit: 30. Aug 2005
Ort: Montreal
58 Beiträge

#40

Re: Winzip library

26. Sep 2005, 13:36

also ich hab das jetzt auch mal mit Abbrevia versucht.

einzelne Dateien kann ich packen, aber wenn ich es mit Directories probiere klappts nicht.
wie bekomme ich das hin?

markieren

Code:

			AbZipper1.BaseDirectory := ExtractFilePath(FileName);

AbZipper1.FileName := 'C:\ZIPs\test.zip';

AbZipper1.AddFiles(ExtractFileName(FileName), 0);

AbZipper1.Save;

AbZipper1.CloseArchive;

ShowMessage(FileName + ' zipped');