Difference between revisions of "User talk:AndrewH"
From Free Pascal wiki
Jump to navigationJump to searchm (Removing all content from page) |
(zlibar problem & fix) |
||
Line 1: | Line 1: | ||
+ | == zlibar problem November 2011 == | ||
+ | Hi Andrew, | ||
+ | |||
+ | Some users on the forum have problems with compiling zlibar, e.g. [http://lazarus.freepascal.org/index.php/topic,15338.msg82334.html#msg82334] . | ||
+ | |||
+ | I've looked in the Sourceforge CCR SVN but can't seem to find the zlibar sources, therefore I'm trying to reach you this way: | ||
+ | Fix for zlibar.pas lines 516-520 (old code commented): | ||
+ | <delphi> | ||
+ | //fStream.Read(Header,SizeOf(TZlibArchiveHeader)); | ||
+ | fStream.Read(FHeader,SizeOf(TZlibArchiveHeader)); | ||
+ | //Header.MajorVersion := LEtoN(Header.MajorVersion); | ||
+ | FHeader.MajorVersion := LEtoN(Header.MajorVersion); | ||
+ | //Header.MinorVersion := LEtoN(Header.MinorVersion); | ||
+ | FHeader.MinorVersion := LEtoN(Header.MinorVersion); | ||
+ | //Header.MicroVersion := LetoN(Header.MicroVersion); | ||
+ | FHeader.MicroVersion := LetoN(Header.MicroVersion); | ||
+ | //Header.TOCLength := LEtoN(Header.TOCLength); | ||
+ | FHeader.TOCLength := LEtoN(Header.TOCLength); | ||
+ | </delphi> | ||
+ | If you need any more info please let me know, | ||
+ | |||
+ | thanks | ||
+ | |||
+ | --[[User:BigChimp|BigChimp]] 07:00, 27 November 2011 (CET) |
Revision as of 08:00, 27 November 2011
zlibar problem November 2011
Hi Andrew,
Some users on the forum have problems with compiling zlibar, e.g. [1] .
I've looked in the Sourceforge CCR SVN but can't seem to find the zlibar sources, therefore I'm trying to reach you this way: Fix for zlibar.pas lines 516-520 (old code commented): <delphi>
//fStream.Read(Header,SizeOf(TZlibArchiveHeader)); fStream.Read(FHeader,SizeOf(TZlibArchiveHeader)); //Header.MajorVersion := LEtoN(Header.MajorVersion); FHeader.MajorVersion := LEtoN(Header.MajorVersion); //Header.MinorVersion := LEtoN(Header.MinorVersion); FHeader.MinorVersion := LEtoN(Header.MinorVersion); //Header.MicroVersion := LetoN(Header.MicroVersion); FHeader.MicroVersion := LetoN(Header.MicroVersion); //Header.TOCLength := LEtoN(Header.TOCLength); FHeader.TOCLength := LEtoN(Header.TOCLength);
</delphi> If you need any more info please let me know,
thanks
--BigChimp 07:00, 27 November 2011 (CET)