DB
а есть способ сделать memo.loadfromfile - из файла в архиве, архив не распаковывая?
можно архив распаковать 'на лету' в памяти
Size: a a a
2020 May 16
DB
гугли хотя бы TJclDecompressArchive
AS
В д10 уже есть встроенный "адаптер" для зипов... Его же можно для gzip-ов...
Но только в поток... Если мемо умеет из потока (почему и спрашивал) то не проблема
Но только в поток... Если мемо умеет из потока (почему и спрашивал) то не проблема
Дt
У него loadfromstream есть?
вроде да
Дt
ну вот представим что умеет из потока, и?
Дt
открываем архив tzip. заливаем файл из архива в stream ?
AS
Не, там есть способ лучше :)
Ща
Ща
AS
открываем архив tzip. заливаем файл из архива в stream ?
http://docwiki.embarcadero.com/CodeExamples/Rio/en/ZLibCompressDecompress_(Delphi)
Только вместо
будет memo.loadfromstream
Только вместо
LOutput.CopyFrom(LUnZip, 0); в procedure TForm1.btnDecompressClickбудет memo.loadfromstream
GB
а что, нету что-то вроде TZipStream, который раззипует вложенный TStream? обычно так делается, как в дельфи не помню уже :)
VA
http://docwiki.embarcadero.com/CodeExamples/Rio/en/ZLibCompressDecompress_(Delphi)
Только вместо
будет memo.loadfromstream
Только вместо
LOutput.CopyFrom(LUnZip, 0); в procedure TForm1.btnDecompressClickбудет memo.loadfromstream
По-моему, это просто сжатые данные прочитает\запишет, но не zip архив. И эти стримы используются уже внутри zipfile
AS
По-моему, это просто сжатые данные прочитает\запишет, но не zip архив. И эти стримы используются уже внутри zipfile
Вероятно, да
2020 May 17
Дt
http://docwiki.embarcadero.com/CodeExamples/Rio/en/ZLibCompressDecompress_(Delphi)
Только вместо
будет memo.loadfromstream
Только вместо
LOutput.CopyFrom(LUnZip, 0); в procedure TForm1.btnDecompressClickбудет memo.loadfromstream
но тут вроде весь файл распаковывается, а мне 1 файл из архива нужно взять, для этого же и не вся распаковка нужна, архив большой
Дt
Дt
вот это же подойдёт?
VA
но тут вроде весь файл распаковывается, а мне 1 файл из архива нужно взять, для этого же и не вся распаковка нужна, архив большой
SB
Не путайте zip файл и zip stream. Файл zip может содержать в себе много файлов, в том числе без сжатия. Zip stream это данные, сжатые zlib
SB
В Delphi 7 есть zip stream, но нету zip file
SB
Читать из zip file в stream (неважно какой) очень просто даже обычным TFileStream - нужно только знать позицию начала и размер данных сжатого файла.