这种报表用什么工具做?(50分)

  • 主题发起人 主题发起人 AK-47
  • 开始时间 开始时间
A

AK-47

Unregistered / Unconfirmed
GUEST, unregistred user!
+--------------------------------------------------------------
|工程项目|开工日期|。。。。|备注|
+--------------------------------------------------------------
| | | | |
| | | | |
| | | | |
--------------------------------------------------------------
+-------------------------------------------------------------
| 项目 |单位|本月新增|本年累计|历年累计|备注|
+------------------------------------------------------------
|市政管网| 公里| | | | |
|其他管网| 公里| | | | |
+-------------------------------------------------------------
说明:
第一表格是可变的,记录数不定,第二个表格是统计。
要求两个表格打成一张A4纸,我现在用的是EHLib控件,能不能做到这点,怎么做?
 
没人理我?!·
 
Ehlib 好像不行
 
如果一张纸打不下也要缩打成1张吗?
 
我觉得不是什么工具能不能做的问题,是哪个简单和效率的问题,只要你愿意用qrp就行。
大不了在needata事件中处理而已
 
用FastReport吧,Ehlib 做不了的
 
to maikee1978:
Qrp行吗?第一个表格可以,可是要等第一个打完了后,接着打第二个(不换页)好像有点难,能给点提示吗?
to Walter:
如果一张纸打不完可以,接着打,但是要接着,不能第一个表格打完后还有很多空白也换纸?
Fastreport我没用过,现在也不打算为一个报表再用第三方控件,最好能用Qrp或EH搞定。
 
用Report Machine 完全可以解决!
Ehlib好像应该不行的。
 
你的要求打在一张a4纸上什么意思,既然第一个表的记录数不确定,如果超过1页怎么办?
用qrp的话,放多个subdetail,每个subdetail的dataset设为不同的即可,可以把两个数据集的东西打在一起的~
 
超过一页就接着打,
 
关键是我想打完第一个表格后接着打第二个表格,用Qrp能做吗?怎么做啊?
 
用report builder 7肯定行,我已这样做过,在rb7中可以把这两张表设成二个字表,然后设第二张表的相对位置为第一张报表的下面就可以打在一张纸上,当然还可以左或右等
不要忘记给分!!!!!
 
用Qr,表的标题及内全用Qrlabel
在needData事中
MoreData:=true;
with dateset1(表1)do
if not eof() then
begin
qrllabe1.caption:=fieldbyName().value;
......
next;
end
else
with dateset2(表2)do

if not eof() then
begin
相应Qrlable.caption:=FieldByName().value;(不用的Qrlabel.enabel:=false)
next;
end
else
moredata:=false;
在beforeprint中
dateset1.first;
dateset2.first;
 

Similar threads

回复
0
查看
1K
不得闲
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部