Hola, Dante.
>Esta bien lo que dices, pero como hago para tener varias imagenes a la vez, osea en un solo "contenedor". Creo que lo que vos me dices es para ver una sola imagen a la vez.
Tienes que poner tantos controles Image como imagenes quieras mostrar. Si esto tiene que ser dinámico, puedes crearlos dentro de un loop.
local lnFoto as Integer, loFoto as object
select Fotos
scan while idPersona = lnIdPersona
lnFoto = lnFoto + 1
thisform.AddObject("Image"+transform(lnFoto),"Image")
loFoto = evaluate( "Image"+transform(lnFoto) )
loFoto.Stretch = 1
loFoto.Height = 100
loFoto.Width = 100
loFoto.Top = 10 + ( lnFoto-1 * 120 )
loFoto.Picture = Fotos.PathName
loFoto.Visible = .t.
endscan
Este código está escrito directamente aquí, así que puede tener fallas, pero creo que se entiende la idea. Vas agregando controles Image y posicionándolos uno abajo del otro. Para disparar el formulario que muestre la misma imagen a tamaño completo lo ideal sería ir agregando controles de una subclase tuya que implemente esto en el evento Click.
Espero que te sirva. No dudes en consultarme si necesitas más ayuda,