Discussion :

[Tsimplice]

Bonjour à tous. Voici ma question: comment pouvoir afficher avec quickreport 3.x de delphi 5 le numéro de page sur le nombre total de page? par exemple page :1/20. Je n'arrive qu'à afficher le numéro de page.
PS : J'ai cherché dans le forum en vain. Si ca existe alors soyez indulgent et passez moi l'URL.
Bye !

[Oluha]

sur ton QReport, place un QRSysData et dans l'option Data met qrsPageNumber

[luc.lacroix]

Essaye ceci, cela fonctionne chez moi. J'espère que cela t'aidera
RP_CMDFOU est un QuickReport,
iNombrePages est une donnée membre d'un TForm

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
begin
  with RP_CMDFOU do
  begin
    Prepare;
    iNombrePages := QRPrinter.PageCount;
    QRPrinter.Free;
    QRPrinter := nil;
 
    { TXT_NUMPAG est un TQRLabel }
    TXT_NUMPAG.Caption := Format('Nombre de pages de la liste : %d', [iNombrePages]);
    Preview;
  end;
end;

[Tsimplice]

Merci luc.lacroix, ta solution marche.
Merci à tous.