bonjour,
j'ai un report (qr) dans lequel je créé un certain nombre de QRLabel à l'exécution.
Au moment de l'impression, j'ai besoin de modifier la propriété alignment de certains des Qrlabel, en fonction de la valeur d'un champ d'une table.
Je n'arrive pas à accéder à cette propriété. Pourtant ça doit être possible non ?
Comment faire ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 // par exemple là je crée mon Qrlabel with TQRLabel.Create(Self) do begin Parent := detailband1; alignment := tarightjustify; left := 0; end; // avant l'impression : procedure Tqetiq.DetailBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean); var i: integer; begin for i:=0 to quickrep1.ControlCount-1 do begin if controls[i] is TQRLABEL then controls[i].Alignment := tacenter; end; // ça marche pas : pas moyen d'accéder à cette propriété end;
Merci de votre aide
Partager