Да я и так пытался:
Код:
var
ms, ms2: TMemoryStream;
begin
ms := TMemoryStream.Create;
ms2 := TMemoryStream.Create;
try
ms.LoadFromFile('C:\qqq.lzo');
ms2.Size := 1024*1024*10;
ms2.Size := lzodecompress(Byte(ms.Memory^), Byte(ms2.Memory^));
ms2.SaveToFile('C:\qqq.txt');
finally
ms2.Free;
ms.Free;
end;
Но компилит...
Правда ошибка: Access violation at address
http://forum.sources.ru/index.php?showtopic=38911