关于fastreport打印固定行问题(5分)

  • 主题发起人 主题发起人 jtaiger
  • 开始时间 开始时间
J

jtaiger

Unregistered / Unconfirmed
GUEST, unregistred user!
我正用fastreport做报表,要求第页打印6行,不满6行时补空行以实现6行效果,请问如何
 
像這種要求比較特殊的報表,用手動建造比較好控制
procedure Page1OnManualBuild(Sender: TfrxComponent);
const
MaxRow=6;
var
i:integer;
row:integer;
begin
with Report.getdataset('frxDBDataset1')do
begin
row:=0;
first;
while not eofdo
begin
Engine.ShowBand(MasterData1);
row:=row+1;
if row mod MaxRow =0 then
begin
Engine.ShowBand(PageFooter1);
Engine.Newpage;
end;
next;
end;
for i:=1 to (MaxRow-(row mod MaxRow))do
Engine.ShowBand(MasterData2);
end;
end;
;
 
这个问题能发个例子过来吗?
 
jtaiger@163.com
多谢了!
 
qq 250852162
请指教!
 
郵件已發,注意查收.[:D]
 
能发3.07版的fastreport给我吗!?
我的qq是250852162请指教!
 
在DELPHIBOX去下載,好几M呢,發不了.我沒有用QQ,不好意思.
 
那你有 2.5版的吗!?
用2.5的做一个我给我!
我这只有2.5的
多谢了!
 
能不能把数据库也发给我呀!>
 
今天说话的兄弟!
我试了一下!
是可以的!
但是有个问题!
为什么回多打印一张空的表呢!?
 
我运行的你的代码!
在报表欲览和程序运行出来的结果是不一样的!
请问是什么回事呀!?
 
用Grid++Report直接多了,不用编程, 设置内容行的‘每页行数’属性为‘是’就行,主页:http://www.rubylong.cn
 
老实说,grid++有些做的确实不错,但是和FR比起来,没有源码,
所以还是选择用FR
 
grid++怎么做报表呀!
 
兄弟 能给我发个吗?
MSN:WO88786705@HOTMAIL.COM QQ.30791611
 
后退
顶部