In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Efeito ao abrir formulário

Foro público de Xailer en español
Sommus
Posts: 310
Joined: Fri Jul 24, 2009 9:39 pm

Efeito ao abrir formulário

Postby Sommus » Tue Feb 05, 2013 4:20 pm

Pessoal,
í‰ possí­vel colocar efeito ao abrir/mostrar e fechar/ocultar o form?
Vi que existe na api do windows a função "AnimateWindow", mas, parece que
ela não está disponí­vel no xailer...
Alguém sabe se é possí­vel fazer isso?
Obrigado pela atenção,
Reginaldo
joselalinf
Posts: 291
Joined: Thu Jan 31, 2013 1:10 pm

Efeito ao abrir formulário

Postby joselalinf » Tue Feb 05, 2013 6:15 pm

Reginaldo,
aquí­ la tienes:
HB_FUNC( ANIMATEWINDOW ) // AnimateWindow( <hWnd>, <nTime>, <nFlags> ) -->
lSuccess
{
hb_retl( AnimateWindow( (HWND) hb_parnl( 1 ), hb_parnl( 2 ), hb_parnl(
3 ) ) );
}
Los parámetros aquí­:
http://msdn.microsoft.com/en-us/library/windows/desktop/ms63 2669%28v=vs.85%29.aspx
Saludos,
José Lalí­n
jrcpoli-quitar
Posts: 558
Joined: Tue Feb 09, 2010 2:26 pm

Efeito ao abrir formulário

Postby jrcpoli-quitar » Wed Feb 06, 2013 10:57 am

Alguno puede poner un ejemplo de utilización de este tipo de apertura y
cierre de ventanas, puede dar un aspecto interesante.
José R.Castro.
El 05/02/2013 18:15, José Lalí­n escribió:
> Reginaldo,
>
> aquí­ la tienes:
>
> HB_FUNC( ANIMATEWINDOW ) // AnimateWindow( <hWnd>, <nTime>, <nFlags> )
> --> lSuccess
> {
> hb_retl( AnimateWindow( (HWND) hb_parnl( 1 ), hb_parnl( 2 ),
> hb_parnl( 3 ) ) );
> }
>
> Los parámetros aquí­:
>
> http://msdn.microsoft.com/en-us/library/windows/desktop/ms63 2669%28v=vs.85%29.aspx
>
>
> Saludos,
> José Lalí­n
>
joselalinf
Posts: 291
Joined: Thu Jan 31, 2013 1:10 pm

Efeito ao abrir formulário

Postby joselalinf » Wed Feb 06, 2013 11:23 am

José Ramón,
nunca lo he utilizado pero será cuestión de experimentar.
En el evento OnActivate() del formulario:
AnimateWindow( ::Handle, 1500, nOr( AW_ACTIVATE, AW_HOR_POSITIVE, AW_SLIDE ) )
Buscando en Google imagino que aparecerán cientos de ejemplos de uso.
Saludos,
José Lalí­n
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Efeito ao abrir formulário

Postby XeviCOMAS » Wed Feb 06, 2013 1:22 pm

José,
Por probar... que no quede, jejeje.
Está Xulo!!!
Gracias.
Si alguien consigue algun efecto más que sorprendente...
como el de Mac al mostrar/ocultar ventanas, que tiene un efecto "abanico" de
pequeño hasta la construcción total de la ventana
y quiere compartirlo... es de agradecer.
Un Saludo,
Xevi.
"José Lalí­n" ha escrit al missatge:51122e78$1@svctag-j7w3v3j....
José Ramón,
nunca lo he utilizado pero será cuestión de experimentar.
En el evento OnActivate() del formulario:
AnimateWindow( ::Handle, 1500, nOr( AW_ACTIVATE, AW_HOR_POSITIVE,
AW_SLIDE ) )
Buscando en Google imagino que aparecerán cientos de ejemplos de uso.
Saludos,
José Lalí­n
Un Saludo,
Xevi.
joselalinf
Posts: 291
Joined: Thu Jan 31, 2013 1:10 pm

Efeito ao abrir formulário

Postby joselalinf » Wed Feb 06, 2013 1:40 pm

Xevi,
¿puedes poner un enlace donde verlo?
Mientras tanto prueba con AW_CENTER.
Saludos,
José Lalí­n
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Efeito ao abrir formulário

Postby XeviCOMAS » Wed Feb 06, 2013 8:16 pm

José,
El efecto que digo és el de minimizar/maximizar...
Hace un efecto de embudo que lo descomprime/comprime del o al icono del
dock.
el efecto "pillarlo" no se como hacerlo.
Ahora bien, si quieres, tirando de las nuevas tecnologí­as, te conectas a mi
MAC.
Conectamos el TeamViewer y lo ves en vivo y directo.
Es una xorrada... que ni siquiera se si se podria aplicar a abrir ventanas
en nuestra aplicación.
No me preocupa en nada el que sea o no posible. Solo era por comentar.
Un Saludo,
Xevi.
"José Lalí­n" ha escrit al missatge:51124e83$1@svctag-j7w3v3j....
Xevi,
¿puedes poner un enlace donde verlo?
Mientras tanto prueba con AW_CENTER.
Saludos,
José Lalí­n
Un Saludo,
Xevi.
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Efeito ao abrir formulário

Postby XeviCOMAS » Wed Feb 06, 2013 8:26 pm

José,
me gusta más como propones...
AnimateWindow( ::Handle, 400, AW_CENTER )
Gracias.
Y si además, en lugar de ponerlo en el evento OnActivate se pone en
OnShow...
METHOD FormShow( oSender ) CLASS TFrmMagatzemIGLlistats
AnimateWindow( ::Handle, 400, AW_CENTER )
RETURN Nil
Queda de lujo!!!
Se elimina el pintado del borde de la ventana hasta que no termina la
animación.
Esto ya roza la perfección!!! jejeje.
Un Saludo,
Xevi.
"José Lalí­n" ha escrit al missatge:51124e83$1@svctag-j7w3v3j....
Xevi,
¿puedes poner un enlace donde verlo?
Mientras tanto prueba con AW_CENTER.
Saludos,
José Lalí­n
Un Saludo,
Xevi.
User avatar
XeviCOMAS
Posts: 524
Joined: Sat Mar 12, 2011 8:16 pm

Efeito ao abrir formulário

Postby XeviCOMAS » Wed Feb 06, 2013 8:31 pm

No se que he escrito!!!
Estoy mirando el efecto de pintado de la ventana y no entiendo nada. El
efecto se produce en OnShow no creo que haga nada.
NO HE DICHO NADA!!!
Un Saludo,
Xevi.
"Xevi" ha escrit al missatge:5112ae7a$1@svctag-j7w3v3j....
José,
me gusta más como propones...
AnimateWindow( ::Handle, 400, AW_CENTER )
Gracias.
Y si además, en lugar de ponerlo en el evento OnActivate se pone en
OnShow...
METHOD FormShow( oSender ) CLASS TFrmMagatzemIGLlistats
AnimateWindow( ::Handle, 400, AW_CENTER )
RETURN Nil
Queda de lujo!!!
Se elimina el pintado del borde de la ventana hasta que no termina la
animación.
Esto ya roza la perfección!!! jejeje.
Un Saludo,
Xevi.
"José Lalí­n" ha escrit al missatge:51124e83$1@svctag-j7w3v3j....
Xevi,
¿puedes poner un enlace donde verlo?
Mientras tanto prueba con AW_CENTER.
Saludos,
José Lalí­n
Un Saludo,
Xevi.
joselalinf
Posts: 291
Joined: Thu Jan 31, 2013 1:10 pm

Efeito ao abrir formulário

Postby joselalinf » Wed Feb 06, 2013 8:35 pm

Xevi,
> El efecto que digo és el de minimizar/maximizar...
> Hace un efecto de embudo que lo descomprime/comprime del o al icono deldock.
Ahora sí­, no lo recordaba.
> Es una xorrada... que ni siquiera se si se podria aplicar a abrir ventanas
> en nuestra aplicación.
> No me preocupa en nada el que sea o no posible. Solo era por comentar.
Probablemente no sea muy complicado pero si te digo la verdad no soy muy
partidario de estas historias.
Saludos,
José Lalí­n
Sommus
Posts: 310
Joined: Fri Jul 24, 2009 9:39 pm

Efeito ao abrir formulário

Postby Sommus » Thu Feb 07, 2013 1:00 am

Caro José Lalí­n,
No meu caso, trabalho com o formulário principal da aplicação, em "TELA
CHEIA", e centralizo o form principal, porém com animatewindow() a tela não
fica centralizada... e também há outro problema, num formulário simples onde
tenho uma imagem de fundo e alguns labels sobre essa imagem, quando uso
animatewindow() nesse form, somente aparece a imagem, os labels não
aparecem...
Obrigado pela atenção,
Reginaldo
"José Lalí­n" <joselalinf@gmail.com> escreveu na notí­cia da
mensagem:51122e78$1@svctag-j7w3v3j....
> José Ramón,
>
> nunca lo he utilizado pero será cuestión de experimentar.
>
> En el evento OnActivate() del formulario:
>
> AnimateWindow( ::Handle, 1500, nOr( AW_ACTIVATE, AW_HOR_POSITIVE,
> AW_SLIDE ) )
>
> Buscando en Google imagino que aparecerán cientos de ejemplos de uso.
>
> Saludos,
> José Lalí­n
>

Return to “Spanish”