animaciones de ventanas.

[ecfisa]

Hola cmm07.

El efecto que buscas se puede hacer con la función AnimateWindow .

Código Delphi [-]
procedure TForm1.FormShow(Sender: TObject);
begin
  AnimateWindow(Handle, 400, AW_CENTER);
end;

Código Delphi [-]
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
   AnimateWindow(Handle, 400, AW_CENTER or AW_HIDE);
end;

Saludos.