11 de marzo de 2002

Tamaño de una imagen

Un truco para saber el tamaño de una imagen

Para conocer el tamaño de una imagen, creamos un objeto IMAGE, cargamos la imagen en el objeto y consultamos las propiedades WIDTH y HEIGHT.
_SCREEN.ADDOBJECT("oImg", "image")
_SCREEN.oImg.PICTURE = GETPICT()
_SCREEN.oImg.STRETCH = 0
? "IMAGEN: " + _SCREEN.oImg.PICTURE
? "ANCHO: " + ALLTRIM(STR(_SCREEN.oImg.WIDTH)) + " PIXELS"
? "ALTO: " + ALLTRIM(STR(_SCREEN.oImg.HEIGHT)) + " PIXELS"
_SCREEN.REMOVEOBJECT("oImg")
Luis María Guayán

1 comentario :