Показать сообщение отдельно
  #10  
Старый 01.10.2013, 12:22
Gareth Gareth вне форума
Активный
 
Регистрация: 21.03.2013
Адрес: Приднестровье
Сообщения: 202
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от Uniq!
Я бы запаковывал эти файлы с паролем с помощью уже готовых компонент: Один, два
с учётом предоставленного кода, я думаю новичку будет по силам справиться с этой задачей.
В данный момент нахожусь на работе, нет возможности проверить...
Выбрал для себя ZipForge.
Пишут что паковать надо так:
Код:
ZipForge.FileName := 'c:\test.zip';
ZipForge.OpenArchive(fmCreate);
ZipForge.AddFiles('C:\myDir\'); //Вся папка со всеми вложениями будет в архиве
ZipForge.CloseArchive;
По моему, пока всё просто. Но надо еще пароль) Как добавить в выше описанный код, пароль, который ставился бы из edit1.text?
Ответить с цитированием