oReport con Landscape()

oReport con Landscape()

Postby yadira » Fri Jun 18, 2010 1:39 am

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:
yadira
 
Posts: 52
Joined: Wed Jun 20, 2007 4:22 pm

Re: oReport con Landscape()

Postby cuatecatl82 » Thu Oct 07, 2010 11:16 pm

Hola de nuevo Yadira:

Si usas TReport y Tprinter:

Code: Select all  Expand view

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  Expand view
LOCAL lLand:= IF( oDevice:GetOrientation() == 1,(.F.),(.T.) )

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



Espero te sirva..
Soluciones y Diseño de Software
Damos Soluciones...

I.S.C. Victor Daniel Cuatecatl Leon
Director y Diseñador de Proyectos

http://www.soldisoft.unlugar.com
http://www.sisa.unlugar.com
danyleon82@hotmail.com
www.facebook.com/victordaniel.cuatecatlleon
User avatar
cuatecatl82
 
Posts: 625
Joined: Wed Mar 14, 2007 6:49 pm
Location: San Cristobal de las Casas, Chiapas México


Return to FiveWin para CA-Clipper

Who is online

Users browsing this forum: No registered users and 4 guests