Keine Seitenanzahl bei FastReport

[LingNeu]

Hallo Delphifreunde,
habe seit einiger Zeit den Fastreport 4.
Wollte mir ein eigenes Print-Preview machen. Geht auch soweit alles, bis auf die Seitenzahl und Gesamtseitenzahl-Anzeige.
Der Report hat 3 Seiten. Habe für den Test nur einen Speedbutton angegeben.
Vielleicht kann mir bitte jemand dabei helfen - ich schaffe diese Sache einfach nicht.
Hier der Code

Delphi-Quellcode:

procedure TForm4.FormCreate(Sender: TObject);
begin
frxReport1.LoadFromFile('4000.fr3');
frxReport1.PreviewOptions.ZoomMode := zmPageWidth; //darstellung auf papierbreite
frxReport1.Preview := frxPreview1;
if frxReport1.PrepareReport then frxReport1.ShowPreparedReport;

//lbl_page.Caption  := inttostr(frxReport1.PagesCount);        //zeigt immer 2 an obwohl 3 Seiten sind
lbl_page.Caption  := inttostr(frxReport1.PreviewPages.CurPage); //zeigt nur 1 an
end;

procedure TForm4.Prn_btn_priorClick(Sender: TObject);
begin
frxPreview1.Next ;
lbl_page.Caption  := inttostr(frxReport1.PreviewPages.CurPage); //zeigt immer 1 an
end;

Wäre sehr dankbar für eine Hilfe oder Hinweis
ciao
LingNeu