请问一个关于fastreport的有关问题？每页的行号从1开始，并把这页的总行数显示到页面的底部

请教一个关于fastreport的问题？每页的行号从1开始，并把这页的总行数显示到页面的底部？
如题。

------解决方案--------------------
var i:integer;

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
i:=i+1;
if i> 3 then //每頁固定行數為3
begin
engine.newpage;
i:=1;
end;
end;

begin
i:=0;
end.
------解决方案--------------------
[LINETHROUGH#]