Bonjour les développeurs
Je souhaite afficher une page QuickReport en paysage. Je m'y prends ainsi:
Dans une fiche Form1 j'ai initialisé l'orientation du Quickrep en paysage.
Puis dans la fiche 2, j'ai écrit :
A l'éxécution, le report est en portrait.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 procedure TForm2.QRPreview1PageAvailable(Sender: TObject; PageNum: Integer); begin QRPreview1.QRPrinter.Orientation:=poLandscape; end;
Le code exact provient de qusoft, l'application est Range.dpr, pour ceux que cela renseigne, où je n'ai rajouté que les détails précédents.
Merci pour toute réponse
Partager