关于QuickReport的换行问题(100分)

L

lyg011

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-16

• #1

我想做一个报表，用QuickReport,
数据集如：
NAME TEL
A 1
A 2
A 3
B 2
C 4
要求报表显示结果如下
NAME TEL
------------------------------------
A 1
2
3
----------------------------------------
B 2
----------------------------------------
C 4
---------------------------------------
好象QR里面无法显示多行的，所以同时显示不了多行A的1，2，3
还有一个就是如果我的‘2’如果太长，想让它自动换行可以吗？用代码？还是有属性设置？菜鸟向各位富翁请教了。
（可以考虑其他自带控件）

 

L

lyg011

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-16

• #2

自己UP，看来大家都比较忙啊

 

L

lyg011

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-17

• #3

100分都没人吊一下，那可是我的身家啊！

 

零

零零

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-17

• #4

还有一个就是如果我的‘2’如果太长，想让它自动换行可以吗？用代码？还是有属性设置？
QRlabel 的autosize 设为false
autostretch 设为true
然后在这里写
procedure Tfrmzl32.QRBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
var
str:string;
i,j :Integer;
begin
i:=60;//长度自己设定
str:=query1.fieldbyname('电话号码').AsString;
j:=length(str);
str:=copy(str,1,4)+#13+copy(str,5,i);//加空格的长度根据需要自己设定
QRLabel8.Caption:=str;
end;
懒得写方法加空格了~~
最笨的办法，楼主不要见笑~

 

I

ivy1982

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-17

• #5

帮你UP，看来大家都比较忙啊

 

零

零零

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-17

• #6

其实楼主可以搜一下以前的贴子，似乎有很多人问过这个问题了~~

 

零

零零

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-17

• #7

自动换行~
线和BAND的长度楼主可以动态伸长~
Width:=width+20;(这个数根据字体大小设定)

 

L

lyg011

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-03-20

• #8

问题解决了，方法：不用QUIICKREPORT，哈哈，还是谢谢两位捧场。