1ª. Haces doble clic sobre la hoja de QuickReport y en el ángulo superior derecho, en donde dice "Portrait", lo cambias por "LandScape"
2ª. Mediante Código:
En este último caso tienes que incluir la "Unit" printers en el Uses de tu Formulario.
Código:
implementation
Uses Printers;
{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
begin
Quickrep1.Page.Orientation := poLandscape;
Quickrep1.Preview;
end;
Un Saludo.