PDA

Ver la Versión Completa : Pixeles y twips en Visual


torito
04-06-2004, 21:58:15
Saludos amigos foreros..... tengo un pequeñin problema.
me encuentro pasando un programa de Visual Basic a Delphi y me encontre que requiero un valor de pixeles y de twips, pero con delphi no se me ah hecho sencillo ya que no existen esas variables como tal en delphi....
alguien podria auxiliarme??
de antemano les agradezco y le envio el codigo en Visual para que quede más claro... :cool:


lngX As Long, lngY As Long

lngX = ScaleX(lngX, vbPixels, vbTwips)
lngY = ScaleY(lngY, vbPixels, vbTwips)

marcoszorrilla
04-06-2004, 22:02:28
Mírate estos enlaces:

http://www.clubdelphi.com/foros/showthread.php?t=5344&highlight=twips
http://www.clubdelphi.com/foros/showthread.php?t=5344&highlight=twips

Un Saludo.

delphi.com.ar
04-06-2004, 22:05:26
Puedes convertirlo usando estas funciones (http://www.clubdelphi.com/foros/showpost.php?p=21431&postcount=10) que te he pasado anteriormente, de la siguiente manera:

begin
PixelsX = PixelsToTwipsX(Canvas.Handle, TwipsX);
PixelsY = PixelsToTwipsY(Canvas.Handle, TwipsY);
end;


Saludos!

torito
05-06-2004, 01:35:29
entonces supongo que LOGPIXELSX me arroja el número de pixeles o como usaria la formula para los pixeles??
gracias :cool:

torito
05-06-2004, 02:28:17
jeje disculpen, ya quedo solucionado, con el maravilloso delphi no es necesario hacer esas converciones, jalo perfecto sin esas converciones, muchas gracias.. :D