Ayuda please.. Showmessage se cierra

[Berto2003]

Hola a todos/as amigos del foro,

Ya estoy de nuevo con mis dudas... Os cuento, lo que quiero hacer es lo siguiente. Quiero mostrar una ventana modal (ShowMessage, por ejemplo) y que en la siguiente instrucción, dentro del código de mi programa se ejecute manualmente el cierre de esa ventana llamando al click del botón, para que se me cierre justo después de mostrarla, y así no tener que hacer click con el ratón en dicho botón. No sé si se podrá hacer esto con esta ventana o con alguna TForm.

Espero haberme explicado bien y sobretodo gracias por vuestra ayuda.


Saludos,

[*Caro*]

Hola Berto2003, lo puedes hacer con un form, en ese formulario añades un Timer, le das el tiempo en que se cerrara tu formulario en la propiedad Interval y el evento OnTimer haces el Close.

Código Delphi [-]
procedure TFormMensaje.Timer1Timer(Sender: TObject);
begin
 Close;
end;

Saluditos

[Berto2003]

Hola Caro,

Jeje, buen componente es el timer, eh?? Es justo lo que quería. Muchas gracias por tu ayuda.


Bye.