Expander foto desde un formulario

Gracias Alex !!!
Existe alguna forma de poder abrir las imagenes con el Windows Viewer, me
ayudaria bastante ya que se puede imprimir y/o manipular la imagen, puedes
ayudarme ??

gracias nuevamente

"Alex Feldstein" wrote in message
news:

On Fri, 25 Jun 2004 09:31:15 -0600, "Elmer Rodriguez"
wrote:

>necesito que cuando el usuario haga click o doble click sobre una foto de

un

>formulario, esta se agrande, como puedo hacerlo ??

Muestras la foto pequeña en un control image. En el método Click() (y
en DblClick tambien si quieres) pones código que llame a un método
de tu form.

En ese método (custom method) haces un lockscreen=.t. luego cambias la
imagen a una grande y cambias el tamaño y posición del control image
maipulando las propiedades top,left,height,width, luego muestras todo
el cambio y listo.


Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(Address scrambled with ROT-13)

On Mon, 28 Jun 2004 09:00:16 -0600, "Elmer Rodriguez"
wrote:

Existe alguna forma de poder abrir las imagenes con el Windows Viewer, me
ayudaria bastante ya que se puede imprimir y/o manipular la imagen, puedes
ayudarme ??

Lo que haces es poner un botón o quizas en el dblclick() de la imagen
misma, que se abra con el programa asociado para mostrar imágenes
(Windows Viewer por ejemplo).

cImagen = "imagen.jpg"
cDir = "c:\temp"

DECLARE INTEGER ShellExecute ;
IN SHELL32.DLL ;
INTEGER nWinHandle,;
STRING cOperation,;
STRING cFileName,;
STRING cParameters,;
STRING cDirectory,;
INTEGER nShowWindow
ShellExecute(0, "Open", cImagen, "", cDir, 1)




Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(Address scrambled with ROT-13)

Gracias Alex !!!
"Alex Feldstein" wrote in message
news:

On Mon, 28 Jun 2004 09:00:16 -0600, "Elmer Rodriguez"
wrote:

>Existe alguna forma de poder abrir las imagenes con el Windows Viewer, me
>ayudaria bastante ya que se puede imprimir y/o manipular la imagen,

puedes

>ayudarme ??

Lo que haces es poner un botón o quizas en el dblclick() de la imagen
misma, que se abra con el programa asociado para mostrar imágenes
(Windows Viewer por ejemplo).

cImagen = "imagen.jpg"
cDir = "c:\temp"

DECLARE INTEGER ShellExecute ;
IN SHELL32.DLL ;
INTEGER nWinHandle,;
STRING cOperation,;
STRING cFileName,;
STRING cParameters,;
STRING cDirectory,;
INTEGER nShowWindow
ShellExecute(0, "Open", cImagen, "", cDir, 1)




Alex Feldstein
________________________________
Microsoft Visual FoxPro MVP
Please respond in the public groups so that everybody
can benefit from the exchange.
Favor de responder en los foros públicos asi todos se benefician.
(Address scrambled with ROT-13)

primero que nada a tu imagen ponle el strecth=1.-Isometrico

En El Evento DblClick de la imagen pon un

if This.Width"2
This.Widthf6 &&el ancho que quiere que tenga cuando
se agrande
This.heigth33 &&el Alto que quiere que tenga cuando se
agrande
else
This.Width"2 &&el ancho que quiere que tenga cuando
se reduzca
This.heigth1 &&el Alto que quiere que tenga cuando
se reduzca
endif


****esto te va a servir para evaluar si esta agrandada o reducida y asi
agrandarla si esta reducida o viceversa , ya que si nomas quieres
agrandarla deja solo el :

This.Widthf6 &&el ancho que quiere que tenga cuando
se agrande
This.heigth33 &&el Alto que quiere que tenga cuando se
agrande
***************************************************************************
espero te sirva




PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway