Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Запаковать файлы RARом [D5, Win95/98, WinXP]


Asker ©   (2006-01-20 13:55:00) 

Подскажите как сделать Sabj.


Кефир87   (2006-01-20 20:22:00) [1]

http://www.delphimaster.ru/cgi-bin/forum.pl?id=1136568214&n=18
Там-же ссылка на другую тему 8) Уверен что в скором времени буду кому-то давать ссылку на ЭТУ тему 8)


Viktop   (2006-01-20 19:22:00) [2]

Полный путь можно не указывать


antonn   (2006-01-20 19:18:00) [3]

Блин. Сколько можно!? Научитесь пользоваться поиском!
... сказал Кефир87, когда уже почти дали ответ :Р


Кефир87   (2006-01-20 18:48:00) [4]

Блин. Сколько можно!? Научитесь пользоваться поиском!


Fay   (2006-01-20 16:13:00) [5]

Лучше ShellExecuteEx, если важно знать, когда RAR закончит работу.


beglec   (2006-01-20 14:29:00) [6]

см. help  ShellExecute

ты запускаешь просто RAR без параметров.
а параметры запускаются другим параметром в а не все в одну строчку
желаю удачи


beglec   (2006-01-20 14:21:00) [7]


ShellExecute(Form.Handle,'open',PChar('полный путь к RAR'),PChar('a -ibck -m5 -av -dh "'+Куда архивируем+'" "+файл1+" "+файл2+" "+папка1+'),'',SW_SHOWNORMAL);

данные ключи означают.
а - создать архив.
-ibck - архивировать в фоновом режиме
-m5 - сжимать по алгоритму "максимальное сжатие"
-av - проверка архива на целостность - то есть небыло ли ошибок при архивировании
-dh - если файл кем то используется, то архивировать не выдывая ошибки. [По умолчанию когда какой то файл кем то используется, то RAR прекращает свою работу]
дополнительные ключи можно посмотреть в справке самого архиватора откуда кстате и была вырезана эта информация


Asker   (2006-01-20 14:19:00) [8]

Это я знаю. Как?
делаю так
ShellExecute(Handle,'Open',pchar(commandline),nil,nil,SW_SHOWNORMAL);
ничего не происходит.
Если в Тоталкомандере пускать commandline, все работает.


Fay   (2006-01-20 13:58:00) [9]

2 Asker   (20.01.06 13:55)
Нужно запустить RAR с параметрами.


Наверх

Титульная страница Поиск, карта сайта Написать письмо