Página 1 de 1

Tips para calcular coordenadas en tcanvas

Publicado: Sab Ago 07, 2010 8:35 pm
por jlaguilars
Siempre se me ha dificultado en definir las coordenas para imprimir en canvas o tambien en definir las pososiciones en la pantalla usando pixeles, pero lo que quiero es pedirles por favor que me orienten en como calcular las posiciones para imprimir ejemplo:
:TextOut( 320 + nMIzq, 690, "FECHA", 300, CLR_BLACK )
:TextOut( 2 + nMIzq, 1000, "ARTICULO", 1185,CLR_BLACK )
:TextOut( 1200 + nMIzq, 1000, "CANTIDAD", 200, CLR_BLACK )
:TextOut( 1418 + nMIzq, 1000, "PRECIO", 200, CLR_BLACK )
:TextOut( 1640 + nMIzq, 1000, "IMPORTE", 200, CLR_BLACK )
como se calcula en pixeles para imprimir en un punto especí­fico como arriba en la hoja.
saludos
José Luis
México

Tips para calcular coordenadas en tcanvas

Publicado: Lun Ago 09, 2010 11:09 am
por jfgimenez
José Luis,
> como se calcula en pixeles para imprimir en un punto
> especí­fico como arriba en la hoja.
es mejor que utilices décimas de mm en vez de pixels, y así­ no dependerás de
la resolución de la impresora. Para eso sólo tienes que poner:
Printer:oCanvas:nMapMode := mmHIMETRICS
después de Printer:StartPage() y antes de los métodos de dibujo. A partir de
ahí­, todas las coordenadas las indicas en décimas de milí­metro, es decir,
100 unidades equivale a un centí­metro.
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

Tips para calcular coordenadas en tcanvas

Publicado: Mié Ago 11, 2010 7:28 pm
por xevi[1]
Jose,
Después de Printer:StartPage() ???
Yo lo he puesto siempre ANTES de...
¿puedes explicarme este pequeño detalle de porqué después?
Gracias.
Un Saludo,
Xevi.
"Jose F. Gimenez" <jfgimenez@wanadoo.es> ha escrit al missatge del
grup de discussió: [email=4c5fc5d0@svctag-j7w3v3j....]4c5fc5d0@svctag-j7w3v3j....[/email]
> José Luis,
>
>> como se calcula en pixeles para imprimir en un punto
>> específico como arriba en la hoja.
>
> es mejor que utilices décimas de mm en vez de pixels, y así no dependerás
> de la resolución de la impresora. Para eso sólo tienes que poner:
>
> Printer:oCanvas:nMapMode := mmHIMETRICS
>
> después de Printer:StartPage() y antes de los métodos de dibujo. A partir
> de ahí, todas las coordenadas las indicas en décimas de milímetro, es
> decir, 100 unidades equivale a un centímetro.
>
> --
> Un saludo,
>
> José F. Giménez
> http://www.xailer.com
> http://www.xailer.info
>
> __________ Informacin de ESET NOD32 Antivirus, versin de la base de firmas
> de virus 5358 (20100811) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5358 (20100811) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com