mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: Error in packing operation

Browse source
This commit is contained in:
Alexander Koblov 2007-07-04 21:25:22 +00:00
commit e9f8e003bb
2 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
doc/uwcxmodule.txt
View file

@ -4,4 +4,5 @@
23.05.2007 Сделал упаковку/распаковку в потоке
Добавил прогресс бар на упаковку/распаковку
22.06.2007 Добавил функции упаковки/распаковки без потока
25.06.2007 Теперь корректно работает ProgressBar при распаковке
25.06.2007 Теперь корректно работает ProgressBar при распаковке
05.07.2007 Исправил ошибку при упаковке

2
uwcxmodule.pas
View file

@ -492,6 +492,8 @@ begin
(* Convert TFileList into PChar *)
FileList := PChar(GetFileList(FFileList));
SetProcessDataProc(0, ProcessDataProc);
PackFiles(PChar(FArchiveName), nil{PChar(sDstName)}, Folder, FileList, FFlags);
end
else