![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сжатие данных для KOL [D7, WinXP]
X9 © (2004-03-13 06:43:00)Подскажите кто-нибудь, где можно взять компонент для сжатия(KOL). Пробовал KOLZLib, только чтобы без библиотек, однако он позволяет сжимать/извлекать только из файла в файл, да и ещё выдаёт ошибку при сжатии файлов > 300кб.
X9 (2004-04-02 14:39:00) [41]2Михаил
А для Delphi7 нет исходников?
Михаил (2004-04-02 09:45:00) [42]У меня есть VCLZip 2.17 с исходниками (D5,D6)...
Пользуюсь очень давно...
Если кого интересует - мыльте....
Dimaxx (2004-04-02 00:13:00) [43]2 Х9: Получить - не получил, но скачал... Сенькс тебе гигантский за сырцы! Там даже есть распаковка метода Inflate64!!!! Вот это супер!!!
Vetek (2004-04-01 12:48:00) [44]ZipTV.rar скачал :)))
Хорошая штука !
Владимир Кладов (2004-04-01 10:13:00) [45]Вот я и говорю: 1 раз все найти и написать правила для автоматической конвертации, и потом можно работу автоматизировать.
X9 (2004-04-01 09:37:00) [46]Спасибо за совет, хотя я этим пользуюсь. Но дело ведь не только в TSringList и TMemoryStream. В этих компонентах очень часто используются процедуры и функции из SysUtils, и, хотя у меня есть исходники этого модуля, в нем есть функции, которые используют другие функции из SysUtils. Я знаю, что в KOL реализованы почти все возможности SysUtils и даже больше, однако рни имеют разное написание, например:
StrToInt -> Str2Int
CompareText -> AnsiCompareText и др.
Поэтому на поиск процедур-клонов уходит немало времени.
Владимир Кладов (2004-04-01 09:21:00) [47]Для таких преобразований можно использовать GlueCut. Один раз задать набор рулесов вроде
REPLACE[TStringList.Create][NewStrList]
REPLACE[TStringList][PStrList]
...
И потом только подставлять их, и получать на выходе KOL-версию компоненты. Подумайте: лучше 1 день потерять (на изучение), зато потом сколько дней выиграть...
X9 (2004-04-01 07:39:00) [48]2Gandalf
Ну как, закачали? Если да, то что вы думаете об адаптации в KOL?
В разумные сроки, конечно:)).
2Dimaxx
А вы получили? Если все всё получили, то давайте распределять обязанности(т.е. модули), т. к. 60 модулей перевести в одиночку, на мой взгляд, очень проблематично. Я тут в KOL немного осваиваться начал. Там ведь в основном надо TMemoryStream, TFileStream заменить на PSream, поставив вместо
T***Stream.Create NewRead/WriteStream и NewMemoryStream, и ещё часто встречается TStringList -> PStrList. Давайте тогда я как чайник в KOL начну с небольших модулей - например, ztvUnJar и ztvJar.
Dimaxx (2004-03-31 21:47:00) [49]Гендальф, участвую!
Gandalf (2004-03-31 19:21:00) [50]Качаю... даст бог скачается... по мне ZipTV круче, ну что попробуем портануть?
X9 (2004-03-31 05:22:00) [51]Заходите на ftp://ruwh.comс логином xplorer и паролем corel или на htt://narod.yandex.ru с логином xplorer-delphi и паролем
corel. На ruwh.com в папке download/delphi/tvzip/, а на народе -
в download/delphi. Если никак, то исходникия уже отослал Dimaxx.
У меня есть VCLZip, только без сырцов, моё мыло - x-comp2004@mail.ru
Dimaxx (2004-03-30 22:20:00) [52]Пишет "Нет такой страницы"! Че делать!!! Залей на hotbox.ru - там пофигу размер.
mdw (2004-03-30 10:38:00) [53]У меня есть компонент VCLZip с исходниками, правда довольно старенький (Version 2.17 February 8, 1999). Давно портануть собираюсь, но сейчас работы - выше крыши:((. Если у кого есть желание и возможность - пришлю. Я смотрел, там, в принципе, работы не очень много.
Ах, да работает с Zip архивами (компрессия\декомпрессия).
X9 (2004-03-30 09:46:00) [54]В общем заходите на http://xplorer-delphi.narod.ruс паролем corel, но только, plz, не меняйте его!
X9 (2004-03-30 09:32:00) [55]Извините за битый линк, вот нормальный:
http://xplorer.ruwh.com/download/delphi/ziptv/ziptv.part1.rar
http://xplorer.ruwh.com/download/delphi/ziptv/ziptv.part2.rar
Всё вместе весит чуть меньше 700 кб. Извините за многотомный архив, но на этом хосте не разрешено отправлять файлы > 500 кб.
X9 (2004-03-30 09:03:00) [56]Кому на мыло - выкладывайте адреса. А вот линк на версию 6.8.4 с сырцами и демкакми - бесплатно:
http://xplorer-delphi.narod/download/delphi/ziptv.rar- весит
около 700 кб.
2Alekc
Да, действительно, теперь это ZipTV.
Dimaxx (2004-03-29 22:36:00) [57]Сайт www.ziptv.com. Либа стоит денег, у меня есть ломалка 3.50, но прогресс не стоит на месте... Исходники любой версии на мыло, плз...
dvkr (2004-03-29 20:02:00) [58]недавно занимался этой проблемой перекопал довольно много материала. но остановился на том , что использовал консольный упаковщик 7z ( http://www.7-zip.org/) и в своей проге запускал.
Писал на KOL что-то типа
ExecuteWait('7za.exe',Бпараметры>,GetTempDir,SW_HIDE, INFINITE, nil)
сжатие получше даже в формате zip.
Alekc (2004-03-29 19:08:00) [59]
> По-моему ты недогоняешь, сам понял чё сказал?
Я - понял. А что непонятно тебе ?
> Я поработал с TCompress и нашёл в нём кучу глюков. Затем,
> покопавшись в своём архиве компонентов, я нашёл оптимальный
> вариант - TVZip.
TVZip ? Это не то, что теперь зовётся ZipTV ?
Gandalf (2004-03-29 17:01:00) [60]Хм... если уж и переводить, то лучшее - у меня есть TVZip но очень старый - и без сорцов, поделись - можно посмотреть...