paszlib/de
한국어 · Deutsch · English · Polski · Русский
Zurück zu den Zusätzlichen Informationen.
PASZLIB ist eine Umsetzung der in der Programmiersprache C geschriebenen Standard Bibliothek zlib in die Programmiersprache Pascal.
Mit PASZLIB können zip-Dateien erstellt, bearbeitet und extrahiert werden.
Die vorliegende Umsetzung in die Programmiersprache Pascal wurde von Jacques Nomssi Nzali erstellt.
TZipper
TZipper enthält Funktionen für die Komprimierung und für die Dekomprimierung von Dateien. Mehr Beispiele als die unten gezeigten finden Sie auf der Beispielseite.
Beispiele
Die Klassen TZipper und TUnZipper stellen für das Komprimieren und Dekomprimieren mehrere Methoden als die unten gezeigten Beispiele zur Verfügung.
Dateien packen
uses
Zipper, SysUtils, Classes, ...;
...
procedure subZip(strZipAusgabeDatei: string; strListeZuPackenderDateien: TStringList);
var
OurZipper: TZipper;
begin
OurZipper := TZipper.Create;
try
// Name der Zip-Datei, die erstellt werden soll
OurZipper.FileName := strZipAusgabeDatei;
// Stringliste mit den Dateien, die gepackt werden sollen
OurZipper.Entries.AddFileEntries(strListeZuPackenderDateien);
OurZipper.ZipAllFiles;
finally
FreeAndNil(OurZipper);
end;
end;
...Dateien entpacken
uses
Zipper, SysUtils, Classes, ...;
...
procedure subUnZip(strZipDatei, strAusgabeOrdner: string);
var
UnZipper: TUnZipper;
begin
UnZipper := TUnZipper.Create;
try
// Name der Zip-Datei, die entpackt werden soll
UnZipper.FileName := strZipDatei;
// Name des Ziel-Verzeichnisses
UnZipper.OutputPath := strAusgabeOrdner;
UnZipper.Examine;
UnZipper.UnZipAllFiles;
finally
FreeAndNil(UnZipper);
end;
end;
...From the Free Pascal wiki, page "paszlib/de", as it stood on 2020-02-23 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.
Talk about this page
Nobody has opened a bench for this page yet. Sign in to open one.