Hola nabucodonosor.
Hice esta prueba simple y me funciona perfectamente:
Código Delphi
[-]
...
implementation
uses Printers, QrPrntr;
procedure TForm1.QuickRep1BeforePrint(Sender: TCustomQuickRep; var PrintReport: Boolean);
begin
QuickRep1.Page.PaperSize := Letter; QuickRep1.Page.Orientation := poLandScape; end;
procedure TForm1.btnPreviewClick(Sender: TObject);
begin
QuickRep1.Preview;
end;
Saludos.