Ajustar imagen

[zeasoftware]

Hola:
Quiero presentar una imagen en un oPicture, pero quiero que aparezca
ajustada, en algunos he visto que se usa el bSTRECH, pero en esta clase no
lo veo, por lo que se me ocurre hacerlo mediante el calculo de las
dimensiones del arcivo imagen que estoy queriendo presentar. El asunto es:
1.- ¿Como puedo saber la altura y la anchura de un archivo .jgp, bmp, etc?
1.1.- como utilizaria GetThumbnailSize( nWidth, nHeight )?
2.- Si hay alguna manera de que pueda presentar la imagen ajustada a las
dimensiones de un cuadro, sera bienvenida.
Saludos.
Ramón Zea

[ignacio]

Ramón,
Utiliza la propieda oBkGnd del formulario, o bevel, y luego establece la
propiedad nBkgndCopy a estilo blSTRETCH.
Consulta la documentación de la clase TPicture.
Saludos,
"Ramón Zea" <zeasoftware@hotmail.com> escribió en el mensaje
news:[email=4322850d@ozsrvnegro.ozlan.local...]4322850d@ozsrvnegro.ozlan.local...[/email]
> Hola:
>
> Quiero presentar una imagen en un oPicture, pero quiero que aparezca
> ajustada, en algunos he visto que se usa el bSTRECH, pero en esta clase no
> lo veo, por lo que se me ocurre hacerlo mediante el calculo de las
> dimensiones del arcivo imagen que estoy queriendo presentar. El asunto es:
>
> 1.- ¿Como puedo saber la altura y la anchura de un archivo .jgp, bmp, etc?
> 1.1.- como utilizaria GetThumbnailSize( nWidth, nHeight )?
>
> 2.- Si hay alguna manera de que pueda presentar la imagen ajustada a las
> dimensiones de un cuadro, sera bienvenida.
>
> Saludos.
> Ramón Zea
>
>

[ignacio]

Ramón,
Podrias mandarnos un pequeño proyecto que reprodujese el problema.
Gracias
"Ramón Zea" <zeasoftware@hotmail.com> escribió en el mensaje
news:43258b11$[email=1@ozsrvnegro.ozlan.local...]1@ozsrvnegro.ozlan.local...[/email]
> nBkgndCopy no lo encontre ni enn los documentos que vienen.
> Ahora puedo mostrar la foto, pero, solo si le pongo una ventana encima y
> la borro, a ver si me explico:
>
> hago oBkGnd := "miimagenamostrar.jgp"
>
> pero no se muestra nada, si pongo una ventana de otra aplicacion sobre mi
> programa y lo quito, la imagen se muestra, mientras no se ve nada.
>
> No se si es un bug o es mi maquina que me da ese problema.
>
> Gracias.
> Ramon Zea
>
>

[zeasoftware]

nBkgndCopy no lo encontre ni enn los documentos que vienen.
Ahora puedo mostrar la foto, pero, solo si le pongo una ventana encima y la
borro, a ver si me explico:
hago oBkGnd := "miimagenamostrar.jgp"
pero no se muestra nada, si pongo una ventana de otra aplicacion sobre mi
programa y lo quito, la imagen se muestra, mientras no se ve nada.
No se si es un bug o es mi maquina que me da ese problema.
Gracias.
Ramon Zea

[zeasoftware]

con esto cambio el valor de la imagen, lo demas es un oBevel en un
oEplorerBar, asi como lo muestro en las imagenes del otro mensaje,.
gracias
METHOD DBBrowse1Change( oSender, lBookMarkChanged ) CLASS tfrmProductos
::oBevel1:oBkgnd := AppData:Dir_Imagenes + ::oDataSet:Imagen
RETURN Nil

[jfgimenez]

Ramón,
> nBkgndCopy no lo encontre ni enn los documentos que vienen.
Es nBkgndMode, y puede tener los valores: blCOPY, blSTRETCH, blCENTER y
blTILED
> Ahora puedo mostrar la foto, pero, solo si le pongo una ventana encima y
> la borro, a ver si me explico:
>
> hago oBkGnd := "miimagenamostrar.jgp"
>
> pero no se muestra nada, si pongo una ventana de otra aplicacion sobre mi
> programa y lo quito, la imagen se muestra, mientras no se ve nada.
>
> No se si es un bug o es mi maquina que me da ese problema.
Es un bug que ya está solucionado. Por ahora puedes poner
::oBevel1:Refresh() para forzar el repintado del control.
--
Un saludo,
José F. Giménez