Animación/Efecto Forms MDIChild
 

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

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:
Saludos

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

:(

Saludos

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

Donde está declarada esa función ??

Vale, ya la he pillado...

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

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;

Hola
Se ve la diferencia cuando un Maestro interviene :) , me alegro que lo resolvieras ArdiIIa, me parecia que se podia pero no estaba seguro, nunca he trabajado con MDI, Gracias.
Saludos

Gracias a ambos.

Saludos

Pero igual sigo teniendo un problema.
Las MDIChild a medida que se van creando, se posicionan es cascada. Si yo siempre creo y destruyo las MDIChild para que siempre exista una y solo una creada, cada vez que esta se crea y se destruye, a medida que se va creando una y otra vez, va rotanto la posicion de esa cascada, lo que da un efecto visual muy desagradable, no es lo mismo cuando se crea arriba de todo que abajo de todo, se ve como se "maximiza", lo que da un efecto muy molesto. Hay alguna forma de que el formulario se visualice solo cuando todo este creado?. La verdad es que no se como evitar o que hacer para no tener ese efecto visual desagradable.

Saludos

Pues controla tú mismo la posición. Pon la propiedad Position del formulario hijo en poDefaultPosOnly y en su evento OnShow ajustas sus propiedades Left y Top a la posición deseada.

// Saludos

Si te refieres al problema del Access violation at address .....
Tal ves sea porque está tratando de hacer operaciones con un form MDI que todavía no existe. Fíjate que yo puse la función dentro del método create del formulario Child.


Si estoy entendiendo bien, quieres decir, que solamente permites una Child visible en un momento dado... Si es así, creo que eso se aparta de la filosofía MDI.

Totalmente de acuerdo. Hay cierta tendencia en los foros a manejar MDI para lo que no están diseñadas. Incluso he visto quienes quieren mostrar una MDIChild modalmente.

// Saludos

Lo que pasa es que, tengo la aplicacion dividida en modo usuario y modo administrador, en modo administrador, se abren todos los childs como en una aplicacion MDI normal, pero en modo usuario no.

Saludos

Sabes, que lo he probado, y efectivamente el formulario se crea en la pos que yo defina, pero la barra de titulo, se desplaza hasta donde tendria que crearse el child y luego vuelve y se maximiza. Siempre tengo ese efecto molesto. :(

PD: todas las Childs tienen en WindowState en wsMaximized ya que las necesito maximizadas, no se si esto es lo que causa el efecto feo.

Saludos

SOLUCIONADO

Encontré este código por el foro, ya que a alguien tuvo este mismo problema. Y eso que busqué y busqué, pero debe ser por la forma de expresiones que abundan en todo foro de alcance internacional

Código Delphi [-]
procedure Animacionform(Enable: Boolean);
 var
   Info: TAnimationInfo;
 begin
   Info.cbSize := SizeOf(TAnimationInfo);
   LongBool(Info.iMinAnimate) := Enable;
   SystemParametersInfo(SPI_SETANIMATION, SizeOf(Info), @Info, 0);
 end;