Definición o ajuste de tamaño del _Screen.picture

1,056 views
Skip to first unread message

Roy Francisco Salas Benavides

unread,
Sep 10, 2013, 4:57:05 PM9/10/13
to publice...@googlegroups.com
Hola amigos del foro.
Tengo desde hace tiempo esta situación, pero la verdad no le había dado mucha importancia porque resulta más en estética que otra cosa, pero no deja de tener su toque.

En mi aplicación tengo un archivo .JPG como fondo de "pantalla", lo asigno al _Screen.picture de la aplicación, el caso es que con algunos monitores, WideScreen por lo general, la imagen se me corte, como un tipo mosaico (a un estilo de 1.15 del tamaño)... la pregunta es, ¿ si existe alguna forma de indicarle al VFP que me ajuste la imagen según el tamaño y/o resolución del monitor ? ... algo así como la propiedad isométrica de los objetos .IMAGE.

Saludos.

Roy Salas.
Costa Rica.

Fernando D. Bozzo

unread,
Sep 10, 2013, 5:33:53 PM9/10/13
to publice...@googlegroups.com
Hola Francisco:

La propiedad picture del form no lo permite, pero si ponés en _screen un control imagen que ocupe toda la pantalla, entonces podés usar la propiedad stretch para que se ajuste la imagen. Luego para que el control se ajuste siempre a los cambios de pantalla, podés programarle la propiedad anchor.


Saludos.-

Luis Mata

unread,
Sep 10, 2013, 5:03:31 PM9/10/13
to publice...@googlegroups.com
Pon una imagen de alta resolución digamos de 1900 px.... y dependiendo con que lo trabajes la imagen se ajustara.

Roy Francisco Salas Benavides

unread,
Sep 10, 2013, 5:55:59 PM9/10/13
to publice...@googlegroups.com
Gracias a ambos. Luis Gracias por el tip, ya lo hice pero no se ajusta.
Fernando voy a probar el tuyo (no tengo ni idea de como hacerlo pero es cuestion de leer).

Ricardo Pina

unread,
Sep 10, 2013, 6:11:19 PM9/10/13
to Grupo VFP
Hola Roy
 
Creo qu sería algo así lo que buscas.
 
_Screen.AddObject("oImg", "image")
_Screen.oImg.Picture =imagendefondo.jpg
_Screen.oImg.Left = 0
_Screen.oImg.Top = 0
_Screen.oImg.Width = _Screen.Width
_Screen.oImg.Height = _Screen.Height
_Screen.oImg.Anchor = 15
_Screen.oImg.Visible = .T.
Saludos


El 10 de septiembre de 2013 18:55, Roy Francisco Salas Benavides <rfsa...@gmail.com> escribió:
Gracias a ambos. Luis Gracias por el tip, ya lo hice pero no se ajusta.
Fernando voy a probar el tuyo (no tengo ni idea de como hacerlo pero es cuestion de leer).



--
            

                   Ricardo Pina

Desarrollo y Servicios Informáticos

                  Profesionales
               www.dsip.com.ar

 

 

Fernando D. Bozzo

unread,
Sep 10, 2013, 6:17:31 PM9/10/13
to publice...@googlegroups.com
Exacto, a esto me refiero. Solo le falta asignar la propiedad stretch para que mantenga la proporción y no se deforme.

Fidel Charny

unread,
Sep 10, 2013, 6:21:43 PM9/10/13
to publice...@googlegroups.com
Yo le agregaría
_Screen.oImg.Stretch=2

Luis Mata

unread,
Sep 10, 2013, 6:21:54 PM9/10/13
to publice...@googlegroups.com
Mejor pon una web en lugar de la imagen como yo:
Pongo el manual de ayuda o publicito mi pagina web y mas productos.. jejejejeje
image
image[2].png
Reply all
Reply to author
Forward
0 new messages