Hola amigos:
Tengo que imprimir un impreso y debe ajustarse perfectamente, lo defino con oPrn:SetSize(2970,210) para ue tenga el tamaño que deseo, pero a la hora de probar si selecciono diferentes impresoras no todas me ponen estas dimensiones. alguen me puede ayudar.
La fuente que utilizo es
PRINT oPrn PREVIEW
DEFINE FONT oFont2 NAME "LUCIDA CONSOLE" SIZE 10, 9 OF oPrn
oPrn:Setup()
oPrn:nLogPixelX(tc101)
oPrn:nLogPixelY(tc102)
oPrn:SetPage(256)
oPrn:SetSize(2970,2100)
store oPrn:nVertRes()/70 to col
store oPrn:nHorzRes()/tc103 to fiz1
Tc101, tc102 y tc103 son variables para ver diferentes resoluciones.
Un saludo
Carlos
Problema con PRINT
Hola Carlos:
Si trabajas en cm no tendrás ese problema.
Ejemplo:
PRINT oPrn PREVIEW
... Defines tus fonts ...
oPrn:StartPage() // Inicio de página
oPrn:CmSay( nCmLin,nCmCol,cVar,oFont )
... imprimes todos tus campos, variables, etc..
oPrn:EndPage() // Fin de página
... si tienes mas páginas repites los pasos anteriores.
ENDPRINT
Si trabajas en cm no tendrás ese problema.
Ejemplo:
PRINT oPrn PREVIEW
... Defines tus fonts ...
oPrn:StartPage() // Inicio de página
oPrn:CmSay( nCmLin,nCmCol,cVar,oFont )
... imprimes todos tus campos, variables, etc..
oPrn:EndPage() // Fin de página
... si tienes mas páginas repites los pasos anteriores.
ENDPRINT