Quick Report und Seitennumerierung

[mcinternet]

Zitat von rawi:

Hallo mcinternet,

habe es gerade mal bei mir versucht, allerdings nur mit einem einseitigen Report unter Delphi 5.

Wenn man die procedure onstartpage nutzt, funktioniert es zumindest bei dem einseitigen report.

Delphi-Quellcode:

procedure TrptSysinfo.QuickRepStartPage(Sender: TCustomQuickRep);
begin
  QRLabel33.Caption := inttostr(sender.PageNumber   ) + ' / ' +
                       inttostr(sender.QRPrinter.pagecount)
end;

gruß rawi

Klappt!!!

Vielen Dank!

Gruss

McInternet