Bonjour à tous,

J'ai un gros problème avec l'utilisation d'un TQRCompositeReport.
Explication :
J'ai une Form (MyFrm) avec un QReport, sur lequel j'ai un tas de TQRLabel que je rafraichit en fonction des entrées utilisateur. Je peux avoir plusieurs pages à imprimer en fonction du nombre d'entrées.
Le problème, c'est que si j'ai 5 pages à imprimer, le contenu des QRlabel.caption est identique sur les 5 pages, alors que lorsque je fais du pas à pas, les caption de mes TQRLabel sont tous différents sur chaque page.

L'évènement OnAddReports de mon TQRCompositeReport et de la forme :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
For NbPage := 1 to NVariable do
begin
 
   // Initialisation des TQRLabel.caption de la page
      Frm_Instr.QRNmrEns1.Caption   := LeCpt.NmrOrd;
      ........
      ........
 
   CompoReport.Reports.Add(MyFrm.Qreport);
 
end;

Code du bouton d'impression :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
PROCEDURE TMyCons.BtnGenCarnetClick(Sender: TObject);
 
BEGIN
 
  CompoReport.Reports.Clear;
  CompoReport.OnAddReports := ComRepAddReports;
  CompoReport.PrinterSettings.ExtendedDuplex := 1;    // 2 -> FORCE IMPRESSION RECTO-VERSO
  CompoReport.Preview;
 
END;
Sur Les X pages, les QRLabel contiennent les mêmes données !!!

Sans doute une mauvaise utilisation de mon TQRCompositeReport, mais je rame....
Quelqu'un a-t-il une idée ???
Merci pour votre aide.....