如何让我的QR报表有没有内容都在每页显示固定的行数? 没人能解答吗?再加100分! (20分)

  • 主题发起人 主题发起人 moonbird11
  • 开始时间 开始时间
M

moonbird11

Unregistered / Unconfirmed
GUEST, unregistred user!
个位请教一个问题:
如何让我的报表有没有内容都在每页显示固定的行数?(我用的是D6自带的QReport)
谢谢!
 
可以的啊,你在每页都画上固定行数的表格线条,就可以了啊。让扩充的纪录去填充(大小一样),就行了!
 
TO:木子小虫
不行吧? 在Detail里画上固定行数的表格,只能有一条记录在里面,怎么能一条一条向下排哪?
发个例子给我好吗?
E_mail: moonbird11@eyou.com
谢了!
 
QuickReport属性页里不是有个打印空的属性么?置为True了么?
 
TO:Undefine
QuickReport属性页里打印空的属性是什么?
 
以下步骤:
1、计算每页的行数
2、统计记录总数
3、看一看还差几行
4、往数据表中加入相应的空记录
5、打印
 
用内存表控件,计算每页好多行,不足往内存表加空记录。就OK了
 
不设置rep.dataset,
使用OnNeedData事件手工提供数据,
detailband放置的是QRLabel,而不是数据控件
每次OnNeedData事件自己设置detailband里面的QRLabel(值或者空值),
还有数据的话,或者还需要打印空行的话,设置参数MoreData为true
否则设置moreData为false结束
 
发个例子给我好吗?
E_mail: moonbird11@eyou.com
谢了!
 
兄弟也能发个例子过来给我吗?
E_mail:hxq-118@163.com
 
发个例子给我好吗?
E_mail: moonbird11@eyou.com
谢了!
 
怎么没有人回答我啊?
 
Undefine说的是:printlfempty属性。
你把QuickRep的Page下的Columns设置为5呀10什么的,试试。
QuickRep我都好久不用了。[:D]
 
大家们
printlfempty属性为真也不对!
QuickRep的Page下的Columns设置为5呀10什么的,试试。也不对!
有没有高手啊?
 
在OnNeedData事件裡面自己寫數據
設置一個變量(行數)
在寫數據的過程判斷行數是否已經達到,如果達到,就跳到第二頁(newcolumn)
如果數據已經到eof了,再判斷是否達到行數,達不到繼續寫空行,達到就停止
就像上面Pipi.的那個方法
 

inc(i);//i是一個全局變量
//qr不要設置dataset(即為空),BeforePrin裡面dataset.first;//設置為第一記錄
//在onneeddata裡面,
//因為以前搞過,都過了比較久了,你試試看看行不行
if not ADOQuery1.Eof then
begin
QRLabel2.Caption:=ADOQuery1.Fields[1].AsString;
QRLabel3.Caption:=ADOQuery1.FieldByName('SL').AsString;//+ADOQuery1.FieldByName('DW').AsString;
ADOQuery1.Next;
if i<=20 then
MoreData:=true
else
begin
QuickRep1.NewColumn;
i:=0;
MoreData:=true;
end;
end
else
begin
QRLabel2.Caption:='';
QRLabel3.CaptioN:='';
if i=20 then
MoreData:=false;
end;
 

Similar threads

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