Jac fcc: creo que has tenido un despiste, en lugar de "EXCEPT" quizá debiste poner "FINALLY". De lo contrario únicamente eliminaría la ventana si se lanza una excepción, pero si todo funcionara correctamente entonces nunca la eliminaría, ocupando cada vez más memoria y generando algún que otro problema más, dependiendo de lo que haga la propia ventana.
Por otro lado, en vez de usar "Application.CreateForm" mejor, quizá, crearla diréctamente. Vamos, que yo lo haría así:
Código Delphi
[-]PROCEDURE TForm1.Button1Click (Sender: TObject);
BEGIN
TRY
Form_ventanaEmergente := TForm_ventanaEmergente.Create (SELF);
Form_ventanaEmergente.ShowModal;
FINALLY
Form_ventanaEmergente.Free;
END;
END;