FiveTech Support Forums

Amigos del foro:

Tengo una parte de mi programa en la que asocio una imagen a un alumno en un recuadro. Como las imagenes originales a asociar pueden tener cualquier tamaño y para evitar que se distorsionen al mostrarlas, las convierto a imagenes cuadradas.

Uso la aplicacion nconvert.exe con los comandos:


Pero al ajustarlas de tamaño, el fondo queda en color negro. Alguien sabe como hacer para que este fondo sea blanco en lugar de negro?

Vean unas imagenes de ejemplo: www.sgedukit.com/files/test/nconv.zip

O existe alguna funcion en FWH de ajustar las dimensiones de una imagen?

Saludos

Ralph

Ralph,

@ <nRow>, <nCol> Image <oBmp> ... SIZE ..., ... ADJUST

Antonio:

La sintaxis que mencionas es la que yo uso:

cFile := "\fotos\foto1.jpg"

DEFINE DIALOG oDlg FROM 0, 0 TO 20, 52

@ 0, 0 IMAGE oImage SIZE 300, 300 OF oDlg ADJUST

oImage:Loadbmp(cFile)
....

En la imagen yo defino las dimensiones en las que se va a mostrar la foto (300x300), y la clausula ADJUST muestra a escala la imagen original (que podria medir 500x500, 400x400, etc).

El problema es cuando los archivos jpg no guardan proporcion con las dimensiones a mostrar (ejm: 200 x300), por lo que previamente necesito convertirlas a la escala adecuada para evitar distorsiones como puedes ver en el archivo problema.jpg que esta en nconv.zip

A proposito, como puedo saber las dimensiones de un archivo jpg ?

Gracias por cualquier ayuda.

Ralph

Ralph,

> A proposito, como puedo saber las dimensiones de un archivo jpg ?

Una vez tienes creado el objeto oImage:

oImage:nWidth()
oImage:nHeight()