je crée dynamiquement des QRlabel
mais ca dépasse une page.
comment faire pour imprimer les autres QRlabel?
merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 repeat qrlbl := TQRLabel.Create(Self); qrlbl.Parent :=QuickRep1.Bands.DetailBand; qrlbl.Name :='nrd'+inttostr(vrnum); qrlbl.Font.Style:=[fsbold]; qrlbl.Font.Size:=10; qrlbl.Font.Size:=10; qrlbl.Top:= qrlbl.Top + vrnum ; qrlbl.Caption:='aaaaaaaaa '+inttostr(vrnum); vrnum := vrnum + 20 ; until vrnum =2000;
Partager