Работа с интерфейсом XZ (не грузится liblzma.dll в примере)

[Jiro]

Пытаюсь протестить работу XZ, сорс интерфэйса тут
https://github.com/delphiunderground/xz-examples-delphi

ди-эл-эль тут:
https://tukaani.org/xz/xz-5.2.3-windows.7z

Как работает встроенная демка не понял даже по исходникам, точнее не понял что там и куда указывать, поэтому немного переделал её:

program compress_easy;
 
uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes,
  XZ;
 
function get_preset:Longword;
begin
  result:=ord('9')-48;
  result:=result or $80000000;
end;
 
var
  StdIn,StdOut: TFileStream; //THandleStream;
  Comp: TXZCompressionStream;
  preset:longword;
begin
  preset:= get_preset;
  StdIn  := TFileStream.Create('01.exe',  fmOpenRead or fmShareDenyWrite);
  StdOut := TFileStream.Create('01.exe.XZ', fmCreate );
  StdIn.Position := 0;
  Comp := TXZCompressionStream.Create(preset, StdOut);
  try
    Comp.CopyFrom(StdIn, 0);
  finally
    Comp.Free;
    StdIn.Free;
    StdOut.Free;
  end;
end.

Запускаю и вылетает ошибка что не найдена liblzma.dll, хотя она рядом с экзешником.
Как жить, что делать?

Сообщение отредактировано: Jiro - 29.07.17, 04:51

[Fr0sT]

А тебе обязательно именно этот алгоритм? Потому что есть достаточно беспроблемных и бездллных реализаций сжатия.

[Jiro]

Fr0sT
Да, ты прав протестил это xz, совсем он слабый.

У меня в коллекции пока только эти:
LZMA1
PPMdG
Brotli
UCL
SynLZ
SynLZO
Deflate
ZZip

Если есть ещё что-то хорошее не откажусь

[Fr0sT]

Цель-то какая? Собрать все известные форматы, или просто любой для внутренних нужд?
В каталоге уже смотрел?

[Jiro]

Fr0sT Цель основная жать текст и *.RVE (формат TRichViewEdit) в максимальной степени ну или близкой к идеалу, коим для текста является бротли а для rve lzma2.
В каталоге ничего нового для себя не нашёл.

Добавлено 02.08.17, 14:17
Fr0sT кстати там в каталоге надо поправить http://www.kluug.net/oxml.php, либа стала платной, а старую версию автор удалил