Delphi компонент ZipForge - Работаем с zip архивами

Опубиковано: 28.12.2008 г., автор: , просмотров: 36248

Delphi компоненты : ZipForge.

Быстрый и мощный VCL компонент позволяет легко создавать ZIP архивы, извлекать, добавлять, заменять, перемещать и удалять файлы из Zip архивов. Кроме того, он создает и читает самораспаковывающийся (SFX) архивы Zip, AES.

В архиве с компонентом есть Демки, так что я думаю вопросов по использованию быть не должно.

Скачать компонент ZipForge для Delphi 7.

Скачать компонент ZipForge для Delphi 2007.

До встречи DelphiExpert.ru !!!

Последние из рубрики

Некит 26 May 2012 в 00:00 #

версия 2006 какую качать?

Harder 28 Jan 2012 в 00:00 #

Да. Это возможно.
У компонента zipForge в графе Events включишь соответствующие обработчики событий.
//Эта процедура показывает имя файла, который распоковывается:) в данный момент
procedure TMainForm.ArchiverFileProgress(Sender: TObject;
FileName: WideString; Progress: Double; Operation: TZFProcessOperation;
ProgressPhase: TZFProgressPhase; var Cancel: Boolean);
begin
label1.Caption := ′Extracting: ′ + FileName;
Application.ProcessMessages;
end;
//Эта процедура показывает общий прогресс распаковки
procedure TMainForm.ArchiverOverallProgress(Sender: TObject;
Progress: Double; Operation: TZFProcessOperation;
ProgressPhase: TZFProgressPhase; var Cancel: Boolean);
begin
Progressbar1.Position := Trunc(Progress);
Application.ProcessMessages;
end;
На форме соответственно должны находится label1 и progressBar1

Кир 23 Jun 2011 в 00:00 #

+5! =)

Nuhim 13 May 2011 в 00:00 #

А как (если вообще возможно) использовать ProgressBar при распаковки архива?

HJSD 18 Feb 2011 в 00:00 #

ЗЛОЙ
с чего это все работает просто правильно пиши запрос
когда записываешь в архив OpenArchive(fmCreate); ,а когда разархивируешь то OpenArchive(fmOpenRead + fmShareDenyWrite);

Delphi компонент ZipForge - Работаем с zip архивами

Delphi компоненты : ZipForge.

Похожие материалы

Последние из рубрики

ОтменитьДобавить комментарий