![]() |
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]() ![]() ![]() |
|
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: 1 Всего: 1 |
Такс компонентами я обзавелся! А если быть точнее то двумя: VCLZip и ZipForge!
Ктонибудь сталкивался с ними? Мне надо заархивировать папку с вложенными папками, но как сделать это не понимаю. Помогите! |
|||
|
||||
RA |
|
|||
![]() Брутальный буратина ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 3497 Регистрация: 31.3.2002 Где: Лес Репутация: 14 Всего: 115 |
ZipForge на много превосходит все аналоги, более того он предоставляет больше возможностей чем, сам архиватор WinZip
|
|||
|
||||
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: 1 Всего: 1 |
RAdmin
Неполучается... ![]() А нигде нет описалова на русском к этим компонентам? |
|||
|
||||
Snowy |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 11363 Регистрация: 13.10.2004 Где: Питер Репутация: 192 Всего: 484 |
FindFirst, FindNext по каталогам.
Все файлы заносишь в список с относительными путями. список грузишь, например в VCLZip и пакуешь. Всё. |
|||
|
||||
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: 1 Всего: 1 |
Snowy
А можно с примерчиком? ![]() |
|||
|
||||
Snowy |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 11363 Регистрация: 13.10.2004 Где: Питер Репутация: 192 Всего: 484 |
Создай форму, кинь на нее батон.
Для примера, здесь запаковывается папка test со всеми подкаталогами.
Это сообщение отредактировал(а) Snowy - 13.3.2005, 15:31 |
|||
|
||||
RA |
|
|||
![]() Брутальный буратина ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 3497 Регистрация: 31.3.2002 Где: Лес Репутация: 14 Всего: 115 |
Что именно не Неполучается ? |
|||
|
||||
RA |
|
|||
![]() Брутальный буратина ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 3497 Регистрация: 31.3.2002 Где: Лес Репутация: 14 Всего: 115 |
Есть вероятность что ты в опциях нахимич, поэтому чтоб не описывать каждую в отдельности выкладываЮ пример ->
Это сообщение отредактировал(а) RAdmin - 13.3.2005, 20:45 Присоединённый файл ( Кол-во скачиваний: 61 ) ![]() |
|||
|
||||
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: 1 Всего: 1 |
Snowy
Спасибо, твой пример оччень помог! Но народ всеравно ничего не архивируется, создается архив размером в 22кб пустой. посмотрите плиз код проги чего там не так?
|
|||
|
||||
Snowy |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 11363 Регистрация: 13.10.2004 Где: Питер Репутация: 192 Всего: 484 |
Смени текущий каталог на Pyt.
Архиватору ты указал в каком каталоге создавать архив. Но для того, чтобы каталоги добавлялись нужно еще изменить текущий каталог, либо указывать абсолютные пути. Второе нежелательно. Поэтому перед AddDir сделай ChDir(Pyt); |
|||
|
||||
Snowy |
|
||||||||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 11363 Регистрация: 13.10.2004 Где: Питер Репутация: 192 Всего: 484 |
Тебе самому-то удобно работать с такими конструкциями? Тихий ужас. 321 символ в строке...
|
||||||||
|
|||||||||
Zlo |
|
|||
Бывалый ![]() Профиль Группа: Участник Сообщений: 235 Регистрация: 18.9.2004 Репутация: 1 Всего: 1 |
Snowy
Спасибо тебе большое!!!
Приму к сведению!!! ![]() |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: Общие вопросы" | |
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |