fastreport的判断当前是否为首页或尾页的问题(50分)

  • 主题发起人 主题发起人 ntjrr
  • 开始时间 开始时间
N

ntjrr

Unregistered / Unconfirmed
GUEST, unregistred user!
请问在FASTREPORT中,如何能判断当页是否为首页(或尾页),比如我想这样,如果判断到当前页是首页那么MEMO1的内容就得到赋值并显示
 
加一个PageHeader
在PageHeader中判断:
Memo1.Memo := '';
if [PAGE#] = 1 then
Memo1.Memo := 'First';
//首页
if [PAGE#] = [TOTALPAGES] then
Memo1.Memo := 'Last';
//尾页
Report Options 必须设置 Two-pass report
 
编绎时提示']'expected 我用的是fr3.03版本
 
我用2.53
fr3.03我试了一下,不知道这样可不可以
在ReportTitle的beforeprint事件中判断:
Memo1.Memo.Text := '';
if <Page#> = 1 then
Memo1.Memo.Text := 'First';
//首页
if <Page#> = <TotalPages> then
Memo1.Memo.Text := 'Last';
//尾页
必须设选项 Report|Options do
uble Pass
 
代码页的[page#]和[totalpages]要写成<page#>、<totalpages>
 
这是我写的MEMO9的内容在首页不出现,其它页面都出现的代码,已经成功了,但我觉得有点复杂,不知道有没有更简单高效的代码,望高手斧正,谢谢!
if (<Page#> =1)and (<TotalPages><>1) then
Memo9.visible:=false;
if (<Page#>>1)and (<TotalPages><>1) then
Memo9.visible:=true;
if (<Page#>=1)and (<TotalPages>=1) then
Memo9.visible:=true;
 
Memo9.visible:= not (<TotalPages>1) and (<Page#> =1) ;
 
Memo9.Visible := (<Page#> > 1) or ((<Page#> = 1) and (<TotalPages>=1))
 
感谢各位指点
 

Similar threads

回复
0
查看
804
不得闲
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
900
SUNSTONE的Delphi笔记
S
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部