Env切换解决zlib报错.rar

Source.rar(已修改好的代码可直接下载覆盖使用)

加强版的原帖子：ShowPost.asp?ThreadID=5824

直接编译时报错，我就尝试修改了一些地方，算是可以运行了，DEMO全通过了，PRINT中文很正常：）

附件中已经是修改过后的SOURCE了：）

D3DX81mo.pas第9366行
原：var ErrorString : array[0..255] of AnsiChar;
改：var ErrorString : array[0..255] of WideChar;
----------------------------------------------------
zInflate.pas第40行
原：const version : String;
改：const version : RawByteString;
第243行同样改
--------------------------------------------------------------
HGE.pas第665行
原：procedure Print(XPos, YPos: Integer; sString: string; R, G, B, A: Byte); overload;
改：procedure Print(XPos, YPos: Integer; sString: RawByteString; R, G, B, A: Byte); overload;
   第1287行
原：procedure TSysFont.Print(XPos, YPos: Integer; sString: string; R, G, B, A: Byte);
改：procedure TSysFont.Print(XPos, YPos: Integer; sString: RawByteString; R, G, B, A: Byte);
   第1296行
原： FFont.DrawTextA(PChar(sString), -1, Rect, DT_NOCLIP, D3dColor_RGBA(R, G, B, A));
改： FFont.DrawTextA(PAnsiChar(sString), -1, Rect, DT_NOCLIP, D3dColor_RGBA(R, G, B, A));


====================================================

另存在的问题是：当建立有窗体的程序编译时存在ZLIB报错的问题，即：HGE项目编译不会有问题，但当在工程中新建立有窗体的项目后无法编译报ZLIB错误的问题，目前在下面的笨办法解决的：
请下载附件中的Env切换解决zlib报错.rar里面有详细说明。

谢谢

安装成功，上来顶一下。

试用了。很好用。而且DELPHI 2010比DELPHI 2007稳定。体积也不会象写普通exe那样增大的太多。

运行  所有demo程序正常，但是 运行API Tester 时会报错新建一个窗体程序时同样报错说

[DCC Fatal Error] Project1.dpr(5): F2051 Unit GraphUtil was compiled with a different version of Zlib.TZDecompressionStream


HGE中的 zlib.pas与D2010的  Zlib.pas  版本冲突  应该怎样解决！！！！

那个多余干掉那个

收到，谢谢楼上！！！

用D2010出现这个错误，不知道怎么解决：

[DCC Error] D3DX81mo.pas(9369): E2010 Incompatible types: 'Array' and 'PWideChar'

感谢，已经找到楼主在另外地方的回答了：

ShowPost.asp?ThreadID=8471

另更新zlib报错的解决方法

请看我在楼顶的红色文字说明

大侠，我用D2009，出错，帮忙解决一下啊

[DCC Error] infblock.pas(19): E2003 Undeclared identifier: 'z_stream'

[DCC Error] infblock.pas(20): E2003 Undeclared identifier: 'check_func'

[DCC Error] infblock.pas(22): E2003 Undeclared identifier: 'pInflate_blocks_state'

....等等一大堆

问题出现在Unit InfBlock;

uses
  zutil, zlib;

function inflate_blocks_new(var z : z_stream; //第一个错误出现在这里
                            c : check_func;  { check function }
                            w : uInt    { window size }
                            ) : pInflate_blocks_state;

不好意思,我没有在D2009上试过,目前只用D2010搞开发的.