Форум на Исходниках.RU

Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834053 Thu, 09 Jul 2020 16:53:22 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834053 Цитата ^D^ima @ 09.07.20, 15:11

Не проще к exe'шнику обращаться через shellexecute с ключами?

Именно мне не проще так не нужны дополнительные окна а скрывать окно и перехватывать прогресс извлечения еще надо уметь делать.]]> Alexandr_7 Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834050 Thu, 09 Jul 2020 15:11:16 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834050 ^D^ima Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834040 Thu, 09 Jul 2020 05:14:41 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834040 Gonarh Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834027 Wed, 08 Jul 2020 15:36:01 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834027 Alexandr_7 Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834021 Wed, 08 Jul 2020 12:16:15 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3834021

Цитата

What's new:
19.00: Encryption strength for 7z archives was increased.
18.06: Some speed optimiztions in LZMA/LZMA2 code.
18.05: Some speed optimiztions in LZMA/LZMA2 code.
18.01: Some changes in LZMA2/xz multithreading code for compressing. Some bugs were fixed.
9.35: AES code and SFXs modules were included to SDK.
9.20: New small SFX module for installers.
9.11: PPMd support.
9.04: LZMA2 and XZ support.

Цитата

Только не понятно как ее установить и как с ней работать.

Последняя версия сдк https://www.7-zip.org/a/lzma1900.7z

Цитата

LZMA SDK includes:
C++ source code of LZMA Encoder and Decoder
C++ source code for .7z compression and decompression (reduced version)
ANSI-C compatible source code for LZMA / LZMA2 / XZ compression and decompression
ANSI-C compatible source code for 7z decompression with example
C# source code for LZMA compression and decompression
Java source code for LZMA compression and decompression
lzma.exe for .lzma compression and decompression
7zr.exe to work with 7z archives (reduced version of 7z.exe from 7-Zip)
SFX modules to create self-extracting packages and installers

Придётся поднапрячься и переписать с любого варианта который более-менее знаком на объект паскаль

Добавлено 08.07.20, 12:21
upd. Кто-то неленивый уже нахеракал на паскале https://www.birtles.org.uk/programming/, как раз таки на версию 4.42, можешь взять за основу, чтобы разобраться что к чему]]> Gonarh Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3833830 Mon, 06 Jul 2020 06:54:33 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3833830 Только не понятно как ее установить и как с ней работать.
Там куча файлов.]]> Alexandr_7 Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3833661 Thu, 02 Jul 2020 19:55:24 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3833661 https://www.7-zip.org/sdk.html]]> Gonarh Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3833365 Sun, 28 Jun 2020 12:26:29 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=3833365 Alexandr_7 Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1488171 Sat, 17 Mar 2007 19:52:00 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1488171 koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1486647 Fri, 16 Mar 2007 12:13:42 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1486647 www.7-zip.org конечно!
Ежели лень, вот прямая ссылка: 7za442.zip]]> Testudo Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1486638 Fri, 16 Mar 2007 12:09:57 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1486638 koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1486616 Fri, 16 Mar 2007 11:50:44 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1486616 Цитата dron-s @ 15.03.07, 13:45

использовать полные пути к файлам...

Не полные, а относительные. Эта либа не умеет работать с полными путями (а может твоя версия и умеет, но предыдущие - нет).

Цитата koder @ 15.03.07, 14:14

Это каждый раз вызывать эту функцию для каждого файла..???

Нет.
Просто в параметр FileList передай нечто вроде:

.\toarch_*.dat,.\..\somedir\mainfile.dat,.\..\..\windows\system32\users32.dll

Добавлено 16.03.07, 11:53
koder, я тебе все же рекомендую скачать 7za.exe - консольный вариант архиватора, и работать с ним. Проблем меньше будет. В том числе с относительными путями: консольный архиватор замечательно глотает полные пути. Да и добавлять файлы в созданный ранее архив проще.]]> Testudo Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485536 Thu, 15 Mar 2007 14:14:53 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485536

function SevenZipCreateArchive( hWnd : HWND; // parent window handle

ArchiveFilename : string;

FileList : string; // comma separated files to be added to archive (wildcards ok)

CompressionLevel : integer; // 0 = none, 9=max

CreateSolidArchive : Boolean; // solid = better compression for multiple files

RecurseFolders : Boolean; // recurse folders?

ShowProgress : Boolean; // if true uses dll's internal progress indicator (callback func ignored)

Callback : TSevenZipCallbackProc = nil ) // optional callback (ShowProgress must be false)

: integer;

Это каждый раз вызывать эту функцию для каждого файла..???]]> koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485532 Thu, 15 Mar 2007 14:11:17 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485532 Цитата koder @ 15.03.07, 13:59

А в тип string разве это уместится???

а зачем в тип String это сувать?
ты же из ListBox списох берёшь...
вот и считывай построчно а потом пакуй]]> dron-s Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485519 Thu, 15 Mar 2007 13:59:54 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485519 koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485510 Thu, 15 Mar 2007 13:45:54 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485510 Цитата koder @ 15.03.07, 12:43

А как архивировать файлы из других папок, не только из текущей..

использовать полные пути к файлам...]]> dron-s Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485407 Thu, 15 Mar 2007 12:43:55 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1485407 Testudo А как архивировать файлы из других папок, не только из текущей..]]> koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484936 Thu, 15 Mar 2007 06:44:50 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484936 Цитата

FileList : string; // comma separated files to be added to archive (wildcards ok)

Можно список файлов через ;, а можно и маски использовать.

Добавлено 15.03.07, 06:48
Я как раз этой библиотекой пользовался. Тут есть несколько грабель.
Во-первых, эти либы от Minoru Akita могут полностью вешать на время архивации 2003ю винду (сервер).
Во-вторых, при работе в нескольких потоках возникают проблемы с загрузкой либы в очередной поток.
Если первая проблема решается поиском другой версии этой либы, то вторую проблему мне решить не удалось. Пришлось использовать оригенальную консольную версию 7za.exe.]]> Testudo Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484663 Wed, 14 Mar 2007 18:43:28 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484663 koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484576 Wed, 14 Mar 2007 17:11:34 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484576 koder Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484553 Wed, 14 Mar 2007 16:59:35 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484553 koder Ты же сам ответил на свой вопрос :unsure: У тебя в архиве 2 ф-ции для добавления и извлечения.]]> P.O.D Delphi: Общие вопросы https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484469 Wed, 14 Mar 2007 15:44:29 +0000 Как работать с 7z в Delphi https://forum.sources.ru/index.php?showtopic=175193&view=findpost&p=1484469 Может есть у кого пример..??]]> koder Delphi: Общие вопросы