Cerrar Form2 desde Form3

[ethangio]

Bucanero, hice como me dijiste y obtengo el siguiente error: " Cannot make a visible window modal "

No entro en bucle con el evento OnActivate. Probe poniento un mensaje en ese evento y solo lo hace despues de mostrarse:

Código Delphi [-]
procedure TForm2.FormActivate(Sender: TObject);
begin
  ShowMessage('Activo');
  Form3.ShowModal;
end;

Lo que no me puedo explicar es por qué cuando presiono el boton del Form2 y muestro el Form3 al cerrar las ventanas con el boton del Form3 si funciona el cierre del Form2.

Por favor prueba el codigo que utilizo en el ejemplo y sabrás a lo que me refiero. Gracias.

[bucanero]

Empezado por ethangio

Bucanero, hice como me dijiste y obtengo el siguiente error: " Cannot make a visible window modal "

No se por que te da ese error, he vuelto a probar el código que te puse y a mi me funciona perfectamente,
Comprueba que el Timer se lance en el evento OnShow y no en el OnActivate.
A mi se me abre el form2 y form3, quedando el form2 de fondo, y al cerrar el form3, bien con el botón o bien desde los controles de la ventana, también se cierra automáticamente el form2.

Empezado por ethangio

Lo que no me puedo explicar es por qué cuando presiono el botón del Form2 y muestro el Form3 al cerrar las ventanas con el botón del Form3 si funciona el cierre del Form2.

Y probando exactamente tu código, me pasa lo mismo que explicas.

Creo que se debe a que hasta que no se ejecuten todos los procesos de inicialización de la ventana no te permite cerrarla, estos procesos al menos son los que incluye los eventos OnShow y el OnActivate.

De hay mi solución del TTimer para darle tiempo a la ventana a finalizar sus procesos y poner la parte del control del FORM3 fuera de los procesos de la ventana 2 .

[ethangio]

Perdón bucanero tenia un error de dedo por eso el error, valga la redundancia.

La solucion que me dijiste efectivamente funciona. Agradezco mucho tu tiempo y la solucion que me proporcionaste.

Un abrazo y de nuevo muchas gracias.