delphi - ZCompress によりアクセス違反が発生する Delphi Xe8

Question

uses 句にもZLib ライブラリの ZCompress();関数をSystem.Sensors, System.Sensors.Components使用すると、この行でアクセス違反が発生します

function deflateInit(var strm: z_stream; level: Integer): Integer;
begin
  Result := deflateInit_(strm, level,
    ZLIB_VERSION, SizeOf(z_stream));
end;

どうすれば修正できますか、または回避策はありますか? iOS FMX Delphi Xe8