Как заархивировать файл?

← →
Эдуард (2002-10-30 17:15) [0]

Нужно заархивировать папку с файлами программно. Как это сделать в Delphi?

← →
Calm © (2002-10-30 17:17) [1]

Есть несколько компонентов специально на эту тему. Их нетрудно найти, должны быть и на этом сайте.
Или проблема в том, что паковать нужно папку?
Я сам паковал только файлы.

← →
Vint © (2002-10-30 17:19) [2]

>Эдуард (30.10.02 17:15)

http://www.ziptv.com

← →
Calm © (2002-10-30 17:24) [3]

Кстати о ziptv.com
Если компонент создавать в design-time, то будет сообщение о его шароварности. А если создать в run-time, то он промолчит. Так было у меня...

Можно использовать какой нибудь архиватор. И через командную строку передать ему параметры.

Var SI:TStartupInfo;
PI:TProcessInformation;
begin
with si do
begin
lpTitle:=NIL; lpReserved:=nil;
dwFlags:=STARTF_USECOUNTCHARS;
cbReserved2:=0; lpReserved2:=nil;
end;
CreateProcess(nil, PChar("arj a "+ArjName+".arj "+FilesNames), nil, nil, False, 0, nil, PChar(cur_path), SI, PI);

Как заархивировать файл? Найти похожие ветки