Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.12.17;
Скачать: CL | DM;

Вниз

Работа со SciZipFile. Как создать архив и запаковать туда файлы?   Найти похожие ветки 

 
Morrison ©   (2006-10-30 20:31) [0]

Добрый день!
Задача: создать новый архив и запаковать туда несколько файлов.
Я скачал модуль SciZipFile, изучил демо, но так и не понял, как с его помощью создать новый архив.

Я написал что-то типа этого:
zip1 := TZipFile.Create;
 zip1.AddFile("file1.txt");
 zip1.AddFile("file2.exe");
 zip1.SaveToFile("MyZip.zip");


И в итоге я получил архив с пустыми файлами.
Закралось подозрение, что я что-то делаю не так. Надеюсь на вашу помощь...


 
Орион ©   (2006-10-30 20:51) [1]

все побежали качать модуль SciZipFile...


 
Morrison ©   (2006-10-30 20:58) [2]

Просто тут его советовали...


 
Орион ©   (2006-10-30 21:00) [3]

> [2] Morrison ©   (30.10.06 20:58)


> изучил демо, но так и не понял, как с его помощью создать
> новый архив.

а сами демки-то работают?


 
Morrison ©   (2006-10-30 21:12) [4]

Да, там одна демо, но она только показывает картинки, упакованные в архив. То есть процедуры архивирования в ней не используются.


 
Орион ©   (2006-10-30 21:22) [5]

> [4] Morrison ©   (30.10.06 21:12)

хм... ну тады ничем помочь, к сожалению, не могу.


 
guav ©   (2006-10-31 20:13) [6]

> Просто тут его советовали...

Мог я советовать, сам воспользовался.


> zip1.AddFile("file1.txt");

это именно добавляет пустой файл, чтобы писать в файлы нужно использовать свойство-массив Data или Uncompressed.

PS: если хочется работать с файлами файлы с диска а не из TStream, то возможно следует выбрать другой компонент; комнонентов работающих с файлами на диске мне попадалось больше, чем работающих с данными в TStream.


 
SpellCaster   (2006-11-01 13:33) [7]

Поставь KAZip и спи спокойно ))



Страницы: 1 вся ветка

Текущий архив: 2006.12.17;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.031 c
2-1164614611
TrainerOfDolphins
2006-11-27 11:03
2006.12.17
Сумма значений поля подчинённой таблицы.


3-1160143985
menart
2006-10-06 18:13
2006.12.17
Полнотекстовый поиск MS SQL SErver 2000


1-1162383327
GEN++
2006-11-01 15:15
2006.12.17
Закрытие процесса


9-1140196538
VolanD666
2006-02-17 20:15
2006.12.17
Косячит алгоритм?


15-1164380325
ArtemESC
2006-11-24 17:58
2006.12.17
Очки - зло...