AD商业广告自由选择
AD商业广告自由选择

HGE引擎加强版本在Delphi2010中如此修改即可正常运行,另更新zlib报错的解决方法

正文概述 开源人   2025-07-03 09:12:30  
直接编译时报错,我就尝试修改了一些地方,算是可以运行了,DEMO全通过了,PRINT中文很正常:)YGE1234FCOM专注游戏工具及源码例子分享
YGE1234FCOM专注游戏工具及源码例子分享
附件中已经是修改过后的SOURCE了:)YGE1234FCOM专注游戏工具及源码例子分享
YGE1234FCOM专注游戏工具及源码例子分享
D3DX81mo.pas第9366行YGE1234FCOM专注游戏工具及源码例子分享
原:var ErrorString : array[0..255] of AnsiChar;YGE1234FCOM专注游戏工具及源码例子分享
改:var ErrorString : array[0..255] of WideChar;YGE1234FCOM专注游戏工具及源码例子分享
----------------------------------------------------YGE1234FCOM专注游戏工具及源码例子分享
zInflate.pas第40行YGE1234FCOM专注游戏工具及源码例子分享
原:const version : String;YGE1234FCOM专注游戏工具及源码例子分享
改:const version : RawByteString;YGE1234FCOM专注游戏工具及源码例子分享
第243行同样改YGE1234FCOM专注游戏工具及源码例子分享
--------------------------------------------------------------YGE1234FCOM专注游戏工具及源码例子分享
HGE.pas第665行YGE1234FCOM专注游戏工具及源码例子分享
原:procedure Print(XPos, YPos: Integer; sString: string; R, G, B, A: Byte); overload;YGE1234FCOM专注游戏工具及源码例子分享
改:procedure Print(XPos, YPos: Integer; sString: RawByteString; R, G, B, A: Byte); overload;YGE1234FCOM专注游戏工具及源码例子分享
   第1287行YGE1234FCOM专注游戏工具及源码例子分享
原:procedure TSysFont.Print(XPos, YPos: Integer; sString: string; R, G, B, A: Byte);YGE1234FCOM专注游戏工具及源码例子分享
改:procedure TSysFont.Print(XPos, YPos: Integer; sString: RawByteString; R, G, B, A: Byte);YGE1234FCOM专注游戏工具及源码例子分享
   第1296行YGE1234FCOM专注游戏工具及源码例子分享
原: FFont.DrawTextA(PChar(sString), -1, Rect, DT_NOCLIP, D3dColor_RGBA(R, G, B, A));YGE1234FCOM专注游戏工具及源码例子分享
改: FFont.DrawTextA(PAnsiChar(sString), -1, Rect, DT_NOCLIP, D3dColor_RGBA(R, G, B, A)); YGE1234FCOM专注游戏工具及源码例子分享
YGE1234FCOM专注游戏工具及源码例子分享
YGE1234FCOM专注游戏工具及源码例子分享
====================================================YGE1234FCOM专注游戏工具及源码例子分享
YGE1234FCOM专注游戏工具及源码例子分享
另存在的问题是:当建立有窗体的程序编译时存在ZLIB报错的问题,即:HGE项目编译不会有问题,但当在工程中新建立有窗体的项目后无法编译报ZLIB错误的问题,目前在下面的笨办法解决的:YGE1234FCOM专注游戏工具及源码例子分享
请下载附件中的Env切换解决zlib报错.rar里面有详细说明。


声明:本文系互联网搜索而收集整理,不以盈利性为目的,文字、图文资料源于互联网且共享于互联网。
如有侵权,请联系 yao4fvip#qq.com (#改@) 删除。