FiveTech Software tech support forums

Juan,

Puedes especificar el tamaño usando estos parámetros:

oPrn:SayBitmap( 0, 0, "screen.bmp", <nAncho>, <nAlto> )

... Marcelino /// http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=10465 /// --------------------------------------- // nAncho ancho pantalla // nAlto alto pantalla // lPreguntar si pregunta antes de realizar el cambio /////////////////////////////////////////////////////////////////// #Include ...

Guillermo,

aCoor := GetCoors( GetDesktopWindow() )

? aCoor[3], aCoor[4]

ó tambien:

nAncho := GetSysMetrics( 0 )
nAlto := GetSysMetrics( 1 )

antonio , en la clase printer oPRN:SetSize (nancho, nalto), nAncho es en cm, ml pulgadas, o en que?? ya le puse numero ahi y nomas no hace lo que quiero. necesito imprimir en fichas de deposito impresas en 3 al paso, es decir son 3 fichas en una hoja ...

Mira si te sirve lo siguiente:

PRNSetSize (nAncho, nAlto)

... /// /// Box redondeada en centímetros para imprimir /// RCaja (oPrn, nArriba, nIzq, nAbajo, nDerecha, nAncho, nAlto, [oPen], [nColor]) /// nAncho y nAlto ancho y alto del arco, por ejemplo 150,150 /// nColor rellena con ese color la caja /////////////////////////////////////////////////// ...

... RoundBox escribe mucho mas abajo. ¿Cual es el problema? /////////////////////////////////////////// Func RCaja(nArriba,nIzq,nAbajo,nDerecha,nAncho,nAlto,oPen, oPrn) Local xCor := {} , yCor := {} // Pasamos coordenadas de cms a pixel xCor := oPrn:Cmtr2Pix(nArriba,nIzq) yCor := oPrn:Cmtr2Pix(nAbajo,nDerecha) ...

Antes de crear el objeto PRINTER, con PRINTER oPrn ..., llama a la función PrnSetSize( nAncho, nAlto ) para establecer las dimensiones de la hoja.

Ricardo,

has probado ha definir el tamaño de página que vas a usar con PrnSetSize( nAncho, nAlto ) ?