Page 1 of 1

oReport con Landscape()

Posted: Fri Jun 18, 2010 1:39 am
by yadira
Hola a todos:
Tengo la necesidad de hacer un reporte de forma horizontal "LandScape() ", pero tengo algunas dudas:
por default el "FOOTER" esta en una posicion para Formato Vertical, Como cambio eso ???.

Como controlo el cambio de pagina en landscape() ?, es decir el numero de renglones por pagina.

Gracias por todo. :wink:

Re: oReport con Landscape()

Posted: Thu Oct 07, 2010 11:16 pm
by cuatecatl82
Hola de nuevo Yadira:

Si usas TReport y Tprinter:

Code: Select all

oReporte:SetLandscape()  //Impresión Landscape
oReporte:SetPortrait()      //Impresión Normal
oReporte:lAutoLand         := .T.  //Para que automaticamente cambie la orientación de la hoja en Vertical u horizontal
Para saber si un reporte esta en Landscape

Code: Select all

LOCAL lLand:= IF( oDevice:GetOrientation() == 1,(.F.),(.T.) )

IF lLand 
    msginfo("LANDSCAPE","Reporte")
ELSE
    msginfo("PORTRAIT","Reporte")
ENDIF

Espero te sirva..