Question

怎样使QRDBText控件中显示的内容自动换行？

Answer 1

参加字符串，在规定命量的字符后加回车。 var tmpstr : string; somelist : TStringList;********************** tmpstr := 'long string'; //30个字符就换行 for i := 1 to (length(tmpstr) div 30+1) do k := 0; //如不雅最后为汉字后半部分，那么i*30,不然i*30-1,以避免半个字符的出现 begin for j := 1 to i*30 do end; if j <= length(tmpstr) then if ord(tmpstr[j]) > 126 then k := k+1; if (k mod 2 = 0) then insert(#13#10,tmpstr,i*30-1) else insert(#13#10,tmpstr,i*30);用TQRMEMO，AUTOSIZE=FALSE，AUTOSTRETCH=TRUE somelist.Clear; somelist.Add(tmpstr); QRMemo1.Lines.Clear; QRMemo1.Lines := somelist;

Answer 2

我在做报表的过程中碰到一个问题，数据库中某一字段被定义为字符型，然则如不雅个中的 内容太多时，在打印的时刻老是侵犯其他表格的地位（该法度榜样用于固定表格的套打），而备注字段的内容在打印时就可主动换行，我想让字符型字段的内容也同样能主动换行，请问该如何做？ 别的，可否在打印预览时显示全部表的内容，而打印时只进行套打！多谢！

Answer 3

把AutoSize设置为false;把WordWrap设置为true;即可！

Answer 4

必定可以,只是你没给它所需的高度.再试一试.