reportbuilder 10 中的memo在换的时候第二行出现乱码,求助!! reportbuilder 10 中的memo在换的时候第二行出现乱码,求助!!应该是控件不支持双字节的原因,我在代码中设置了wordwrap := True;看了以前的帖子,好像要修改一个wordwrap属性调用的函数,RB 10 中没找到该函数,如何处理请指教!!!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 不支持Unicode 没办法了,要么自己改源码,比较麻烦, 自己要修改一下rb空间的源代码,以支持汉字的折行。步骤如下:1、在DELPHI中打开rbRCL107.dpk,并打开其中的ppPlainText.pas2、找到过程WrapCharacters,在while循环前加上下面的代码: //--begin如果加上这个字后,行长超限,并且该字为双字节的字,则不要把这个字放到当前行 liLineWidth := CalcTextWidth(lsCurrentLine + lsNextWord); if (liLineWidth > FWidthAvailable) and (StrByteType(Pchar(lsNextWord), 0) = mbLeadByte) then begin aNextWord := ''; aRemainingChars := lsNextWord; lbFits := true; end; //--end3、重新编译rbRCL107.dpk,并把rbRCL107.bpl和rbRCL107.dcp拷贝到c:\windows\system32下面4、重新编译你的应用程序再看看效果如何? 如何判断已输入的字符数, 求一简单字符串替换算法 -==========(简单问题)关于远程数据模块单元的疑惑==================- 问一个弱弱问题,请帮忙解答,谢谢,急!! 小问题求答!! DateTimePicker问题,高手请进,在线等待 dbgrid<=>access( txt ,excel)的导入导出 报表的问题,如何在报表中显示多行数据 我是Delphi初学者!请教... delphi idtcpclient怎么做 Invalid variant operation???? 怎样实现视频文件 预览!
1、在DELPHI中打开rbRCL107.dpk,并打开其中的ppPlainText.pas
2、找到过程WrapCharacters,在while循环前加上下面的代码:
//--begin如果加上这个字后,行长超限,并且该字为双字节的字,则不要把这个字放到当前行
liLineWidth := CalcTextWidth(lsCurrentLine + lsNextWord);
if (liLineWidth > FWidthAvailable)
and (StrByteType(Pchar(lsNextWord), 0) = mbLeadByte) then
begin
aNextWord := '';
aRemainingChars := lsNextWord;
lbFits := true;
end;
//--end
3、重新编译rbRCL107.dpk,并把rbRCL107.bpl和rbRCL107.dcp拷贝到c:\windows\system32下面
4、重新编译你的应用程序
再看看效果如何?