QuickReport : poLandscape
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 :
Code:
1 2 3 4 5 6
|
procedure TForm2.QRPreview1PageAvailable(Sender: TObject;
PageNum: Integer);
begin
QRPreview1.QRPrinter.Orientation:=poLandscape;
end; |
A l'éxécution, le report est en portrait.
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