Cerrar componente con ventana modal

[elcigarra]

La solución de luisgutierrezb funciona perfecto a lo que yo pregunté, sin embargo el hecho de que la ventana no sea modal genera nuevos problemas.
Algo de código (esquemático). estábamos aquí...

Código Delphi [-]
  
function TMyComp.Execute: Integer;
begin 
  Form1:=TForm1.Create(Self);
  try
    FormCalendar.ShowModal;
  finally
    Result := Form1.SpinEdit1.Value;
    Form1.Free;  // Sentencia que quitaría cuando no es modal
  end;
end;

El problema con el Show es que como la aplicación no se detiene en la ventana modal, el resultado de la función Execute se carga con el primer valor del SpinEdit (del Form) y no con el último, no importa como sea que salga.