¿Como cambiar la orientación del papel al imprimir?

[neon]

Hola,
Necesito cambiar por defecto la orientación del papel de vertical a horizontal. He estado mirando el printdialog y el printersetupdialog pero no tienen ninguna opción que cambie a sentido horizontal. La única forma es llamano a printdialog.execute y cambiandolo a mano. NECESITO hacerlo mediante código, para que se imprima por defecto horizontalmente.
¿Sabeis como puedo hacerlo?urge.

Salu2.

[marcoszorrilla]

Añade "Printers" al Uses. (Si es que estás imprimiendo con el Canvas?)

Código Delphi [-]
  procedure TForm1.PortraitClick(Sender: TObject);
  
  begin
    Printer.Orientation := poPortrait;
  end;

Un Saludo.