Mostrar form de forma animada

[[Bicho]]

Para que cuando visualicemos un form lo podamos hacer de forma animada simplemente:

Código Delphi [-]
  TheForm.BringToFront;
  AnimateWindow(TheForm.Handle,Retardo, AW_HOR_NEGATIVE); //retardo en milisegundos
  TheForm.Show;

Los parámetros son:
- El handle al form que queremos animar.
- El retardo, que es el tiempo que queremos que dure la animación.
- Y el tipo de animación podemos elegir entre estas:
AW_HOR_NEGATIVE
AW_VER_POSITIVE
AW_VER_NEGATIVE
AW_BLEND
AW_CENTER
AW_HOR_POSITIVE, pueden hacerse además combinaciones: AW_HOR_POSITIVE + AW_VER_POSITIVE

[ramphi]

este truco es exelente

[AFilth]

Me gusta el efecto que sale con el AW_BLEND. Una cosa, me he dado cuenta de que si en vez de hacer "TheForm.Show;" hacemos "TheForm.ShowModal;" se pierde el foco de la aplicación...pq puede ser esto?

Un saludo.

[AGAG4]

No me funciona para ShowModal

[neokobu]

Se podra animar un splashscreen?

Intente hace poco pero no me reconoce la instruccion animateWindow

salu2.

[ingabraham]

existen mas animaciones, q se pude hacer con el showmodal. lo bloquea.
excelente truco

[comotumec]

demasiado bueno tenia tiempo buscandolo :D gracias