Задачка №26
Я тут обругался страшно на одно «нововведение» в библиотеке ZLib.
Упражнение: что не так в этом коде? В предположении, что все параметры указаны верно. Функция, если что, возвращает Z_OK
:
function InitDeflate(const ACompressionLevel: Byte): TZStreamRec;
var
Code: Integer;
begin
FillChar(Result, SizeOf(Result), 0);
Code := System.ZLib.deflateInit_(Result, ACompressionLevel, zlib_version, SizeOf(TZStreamRec)));
// ... далее идёт анализ Code
// в данном случае Code = Z_OK
end;
Бонус-упражнение: найдите описание этого поведения в документации к ZLib.