Que salte una ventana a los 10 segundos

[gontxalo]

Hola
Ya he puesto todos los form menos el 1 en available.
He puesto el code para llamar a los otros forms desde botones y funciona.

Pero....

Lo que me sigue sin funcionar es el timer para llamar al form3. Si salta y si es en modal por lo que hasta que no se cierra no se puede manejar el form1. Pero me salta no una sino indefinidamente. Con Show salta una vez, con ShowModal salta indefinidamente, uno encima del otro.

Con el botón funciona:
procedure TForm1.Button1Click(Sender: TObject);
begin
Form3 :=TForm3.Create(self);
Form3.ShowModal;
end;

Timer 1 con show funciona:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Form9 :=TForm9.Create (self);
Form9.Show;
Timer1.Enabled :=False;
end;

Timer 2 con showmodal salta el form3 una vez encima de si mismo indefinidamente:
procedure TForm1.Timer2Timer(Sender: TObject);
begin
Form3:=TForm3.Create (self);
Form3.ShowModal;
Timer2.Enabled :=False;
end;

Que puedo hacer para que el form3 salte sólo una vez?

Gracias