Que salte una ventana a los 10 segundos
Hola.
En una aplicación vcl quiero que al ejecutarse, salte el form1, pero que el form2 salte encima del 1 y que el usuario no pueda manejar el form1 hasta que cierre el dos. Para ello he puesto el siguiente code:
procedure TForm1.FormActivate(Sender: TObject);
begin
Form2.ShowModal;
end;
Funciona.
Pero quiero que un Form3 salte a los 10 segundos de que el Form 1 esté abierto. Esto como lo puedo hacer?
|