Page 1 of 1
Otro problema con la vista previa
Posted: Sat Sep 07, 2024 3:28 pm
by Armando
Amigos:
Sigo liado con la vista previa
En una aplicación creo un reporte con la TReport, la vista previa en mi PC de desarrollo
se ve de esta manera (Bien)
Pero en el servidor de mi cliente la vista previa se ve así (Mal), la muestra
en landscape
En mi código tengo definido el tipo de página y la orientación
Code: Select all | Expand
oReporte:oDevice:SetPage(1)
oReporte:oDevice:SetPortrait()
Alguna idea? de por donde van los tiros
Saludos
Re: Otro problema con la vista previa
Posted: Sat Sep 07, 2024 8:12 pm
by karinha
Armando, intenta asi:
Code: Select all | Expand
oReport:oDevice:lPrvModal := .T.
oReport:oDevice:SetPage(9) //-> Formato A4
// oReport:SetPortrait() //Vertical -> No funciona.
PrnPortrait() // vertical/Retrato
Regards, saludos.
Re: Otro problema con la vista previa
Posted: Sat Sep 07, 2024 8:50 pm
by Armando
Estimado Joa:
Es con la TReport, no con la TPrinter.
Saludos
Re: Otro problema con la vista previa
Posted: Sun Sep 08, 2024 9:32 am
by Antonio Linares
Que resolución de pantalla y escala hay en cada PC ?
Re: Otro problema con la vista previa
Posted: Sun Sep 08, 2024 2:48 pm
by karinha
Armando,
Code: Select all | Expand
// C:\FWH\SAMPLES\CORHEAD.PRG
#include "fivewin.ch"
#include "report.ch"
FUNCTION Main()
LOCAL oReport, oFont, oBold, oCol
USE CUSTOMER NEW SHARED
SET FILTER TO RecNo() <= 20
GO TOP
DEFINE FONT oFont NAME "TAHOMA" SIZE 0, - 12
DEFINE FONT oBold NAME "VERDANA" SIZE 0, - 13 BOLD
REPORT oReport PREVIEW FONT oFont, oBold
oReport:oDevice:lPrvModal := .T.
oReport:oDevice:SetPage( 9 ) // -> Formato A4
// oReport:oDevice:SetPortrait() //Vertical
PrnPortrait() // vertical/Retrato
oReport:aClrText[ 1 ] := CLR_BLACK
oReport:aClrText[ 2 ] := CLR_HRED
COLUMN oCol TITLE "NAME" DATA FIELD->FIRST FONT 1
oCol:bTitleFont := {|| 2 }
COLUMN oCol TITLE "CITY" DATA FIELD->CITY FONT 1
oCol:bTitleFont := {|| 2 }
ENDREPORT
ACTIVATE REPORT oReport
RELEASE FONT oFont, oBold
RETURN NIL
Regards ,saludos.
Re: Otro problema con la vista previa
Posted: Sun Sep 08, 2024 6:33 pm
by Armando
Antonio Linares wrote:Que resolución de pantalla y escala hay en cada PC ?
Maestro:
En mi PC de desarrollo tengo 1920 x 1080 y
En el servidor de mi cliente hay 1024 x 768
Otros reportes creados con la misma TReport se ven perfectos, lo que me hace
pensar que es mi .PRG el que tiene algo mal. el tema es qué?
De hecho, al principio todo iba bien pero en algún cambio tronó, he ido deshaciendo
los _ pero no hay éxito. seguiré intentando.
Saludos