fastReport如何控件分页啊，要用代码写的?(100分)

我的fastReport版本是2.52的，代码如下：
frRqryData.Pages.Clear;
frRqryData.Pages.Add;
// create page
Page := frRqryData.Pages[0];
.
.
.
.
.
if iy >3 then
begin
iy := 0;
Page.NewPage;
end;

为什么我的NewPage会出错呢？

procedure myManualBuild(Sender: TfrPage);
begin
if iy >3 then
begin
iy := 0;
Sender.NewPage;
end;
end;

//调用
frReport1.OnManualBuild := myManualBuild;
frReport1.ShowReport;

to:lihoulong
没有用啊，在OnManualBuild 虽然可以用NewPage.
可是像
Page := frReport2.Pages[0];
v := TfrMemoView.Create;
// create memo
v.SetBounds(20, 20, 200, 16);
v.BandAlign := baWidth;
v.Prop['Alignment'] := frtaCenter;
// another way to access properties
v.Prop['Font.Style'] := 2;
v.Memo.Add('Your text is:123456789');
Page.Objects.Add(v);
frReport2.ShowReport;
这样的代码就没办法显示了。
而在任何一个button的onclick事件中都可以动态控制？？？
谁能告诉我怎样在OnManualBuild事件以外的其他地方调用page.newpage也可以的，谢谢了

你的代码是通不过的.为什么不用Pages.Add一定要用page.newpage??

我用
frRqryData.Pages.Add;
// create page
Page := frRqryData.Pages[1];
代码再创建一页，可是根本不会出现第二页，总是出现一页。

原来的的frRqryData.Pages[1]没写放Band所以阅览不出来。
谢谢lihoulong的热心回答。
问题已解决。