Animación/Efecto Forms MDIChild

[MaMu]

Animación/Efecto Forms MDIChild.

Existe alguna funcion o posibilidad de animar la creacion y destruccion de un MDIChild??? al estilo AnimateWindow. (esta no me fuciona con los MDIChild).

Saludos

[[Caral]]

Hola
No se si esto sirva o si se podra usar en un MDIChild:

Código Delphi [-]
var
retardo: integer;
begin
  retardo:= 10000;//retardo en milisegundos
  Form2.BringToFront;
  AnimateWindow(Form2.Handle,Retardo, AW_HOR_POSITIVE + AW_VER_POSITIVE );
  Form2.Show;

De donde saque esto dice:

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

Saludos

[MaMu]

No me funciona, me tira error ("Access violation at address .....")



Saludos

[[ArdiIIa]]

No sabía que existiera esa función....
Pero en Delphi3000 he encontrado esto:

AnimateWindow is a API which can enhance your GUI by adding special animations to your forms. However, the API is not valid in all operating systems. It is only valid in Windows 98 / 2000 and >

This code shows you how to use AnimateWindow when (and only when) it is supported. Without crashing and burning when it is not supported.

Donde está declarada esa función ??

[[ArdiIIa]]

Vale, ya la he pillado...

En un form normal, si funciona... en un MDI no lo he probado..

[[ArdiIIa]]

Y ahora si, la he probado en MDI y funciona perfectamente.

Código Delphi [-]
procedure TForm2.FormCreate(Sender: TObject);
begin
  BringToFront;
  AnimateWindow(Handle,500,  AW_VER_POSITIVE);
end;