Главная страница
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.066 c
3-1160390203
Tornado
2006-10-09 14:36
2006.12.17
Проблема с датой в dbf


8-1146646405
Wm.DIGGER
2006-05-03 12:53
2006.12.17
WAV - TimeStreatch (сжатие звука по времени) ...


2-1164719095
Феникс
2006-11-28 16:04
2006.12.17
Не могу разобраться с ExtractFilePath(Application.ExeName)


2-1164519393
apic
2006-11-26 08:36
2006.12.17
получить хэндл самой формы


8-1146316696
keni
2006-04-29 17:18
2006.12.17
Файл в список воспроизведения