如何在Qreport中实现自动过长文本的换行?(50分)

  • 主题发起人 主题发起人 happy22
  • 开始时间 开始时间
H

happy22

Unregistered / Unconfirmed
GUEST, unregistred user!
  我有一个新闻的报表,其中有的标题很长,我只给标题20个汉字的空间,但是 
我想在报表中让过长的标题实现自动换行,比如60字的标题就要分三行显示,但是
该行其它字段也要相应居中。报表要求有网格,就像Word中的表一样。
  多谢各位高手指点!
 
我以前在CSDN上发过一个帖子,是解决这方面的问题的,
不过需要改源码,对了,还有,你的QR是什么版本的?
 
处理onprint事件:
 
const
MAXLEN=40;
var
i_ins,i,j:integer;
begin
i_ins:=0;
j:=length(value) div MAXLEN;
for i:=1 to jdo
begin
if Windows.IsDBCSLeadByte(byte(value[i*MAXLEN-1+i_ins])) and Windows.IsDBCSLeadByte(byte(value[i*MAXLEN+i_ins])) then
begin
insert(#13,value,i*MAXLEN+1+i_ins);
inc(i_ins);
end
else
begin
insert(#13,value,i*MAXLEN+i_ins);
inc(i_ins);
end;
end;

居中只需设align属性即可
 
好,收藏...
 
接受答案了.
 
后退
顶部