РАСПАКОВАТЬ ZIP DELPHI

Для распаковки zip архивов в Delphi можно воспользоваться стандартными средствами языка, используя классы из библиотеки System.Zip. Для начала, необходимо создать экземпляр класса TZipFile, указав путь к архиву в конструкторе:

ZipFile := TZipFile.Create;
ZipFile.Open('C:\example.zip', zmRead);

После открытия архива, можно перебирать содержащиеся в нем файлы:

for I := 0 to ZipFile.FileCount - 1 do begin
FileName := ZipFile.FileNames[I];
Stream := TMemoryStream.Create;
try
ZipFile.Read(FileName, Stream);
// используем данные из потока
finally
Stream.Free;
end;
end;

Наконец, закрываем архив:

ZipFile.Close;
ZipFile.Free;

Как распаковать архив, разархивировать файл

Как распаковать архив ZIP, RAR, 7z простыми способами

Миграция c Delphi 7 на Delphi 10.4 Community Edition c библиотеками RxLib (+БОНУС)

Как открыть RAR файл на Windows XP и распаковать ZIP

JCLCompression and 7-Zip - Delphi #207

Как Распаковать Файлы на компьютере. Разархивирование Zip, Rar и др.

Реклама
Новое
Реклама