如何在报表中换行?(在线等) QRMEMO却不能连接到数据库. 征求新解法....在线等... 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 好像不能实现自动换行,我以前也遇到过这你这个问题,没法,只能人为的编码实现或直接导入到WORD中,他可以自动换行。 QRMEMO其实是手动的写,最终也不能将其换行,如果你要是一定用的话,只有动态的从库里边提,然后自己写换行;如果导入到word里面的话,是可以换行; 给我分!算话吗?用TQRPExMemmo,在他的Strings中填写您的“{[字段名]}” Delphifan,为什么我把wordwrap设置为TRUE,把autostretch设置为TRUE,再把autosize设置为FALSE还是不会自动换行呢? 有谁能再帮我一下, 小弟感激涕零,当然分数大大的奉上. quickrep有很多限制最大的就是不灵活, 可以这样啊:)你先将数据取出来,算一个长度,然后根据每行的字数,看中间加几个chr(13)。(不是好办法)难道用QRDBMemo不可以吗?或者DBRichText。 DBRICHTEXT联到数据库后怎样自动显示出来能,好像没发现QRDBMemo. 常见问题,不过我已经有了解决方法.方法1.人为添加空格.也就是在显示前,进行字符处理.不过要计算.方法2.在你的from上放一个TMemo(visible:=false),把你要显示的string付给它,通过TMemo.text 再导出来,就可以实现自动换行了.不信试试. 这么老兄,你是用的QuickRep吗?我找了一下,好像没有QRDBLABEL组件哦,如果你说的是QRDBText话,我可以跟你解决换行的问题。将QRDBText1的AutoSize := false;再把Height加大;QRDBText1的onPrint事件中写如下代码:procedure TForm1.QRDBText1Print(sender: TObject; var Value: String);begin value:=copy(value,1,4)+#13+#10+copy(value,5,length(value));end;就OK了。 非常感谢xiahongboy提供的方法,我想关于汉字的正确截取我想我可以解决的。谢谢各位参与我的问题,谢谢了。 不能换行的原因是:因为汉字是紧密连接的,不像 E 文, 中间有空格。 Delphi 可是为 E 文设计的! 不知道中文 Delphi 解决这个问题没? pg数据库导入到mySql中出现乱码 opendialog只能选择一个文件吗? 多线程问题? 想用OLE2方式使用OUTLOOK,请问: canvas画点后如何选取和移动? 哪里有Delphi 5中文企业版 下载??? 讨论! 我用DATABASE DESKTOP 建的VFP文件,如何在程序中打开? 急,请高人指点--怎样加入系统的弹出菜单!!! 如何将WDL格式转换成TXT格式? 关于在Delphi中动态创建表的问题,很简单的!! 如何得到网卡的mac?
我以前也遇到过这你这个问题,没法,只能人为的编码实现
或直接导入到WORD中,他可以自动换行。
如果导入到word里面的话,是可以换行;
用TQRPExMemmo,在他的Strings中填写您的“{[字段名]}”
最大的就是不灵活,
你先将数据取出来,算一个长度,然后根据每行的字数,
看中间加几个chr(13)。(不是好办法)难道用QRDBMemo不可以吗?或者DBRichText。
方法1.人为添加空格.也就是在显示前,进行字符处理.不过要计算.
方法2.
在你的from上放一个TMemo(visible:=false),把你要显示的string付给它,通过TMemo.text 再导出来,就可以实现自动换行了.不信试试.
将QRDBText1的AutoSize := false;
再把Height加大;
QRDBText1的onPrint事件中写如下代码:
procedure TForm1.QRDBText1Print(sender: TObject; var Value: String);
begin
value:=copy(value,1,4)+#13+#10+copy(value,5,length(value));
end;
就OK了。
谢谢各位参与我的问题,谢谢了。