Resultado ModalResult de un Form

[vejerf]

Ante todo Delphius darte las gracias por tu colaboración.
El código que llama al Form secundario es el siguiente:

Código Delphi [-]
with TAgregarUnidadForm.create(nil) do
  try
    if ShowModal = mrOk then
    begin
      //Sentencias varias
    end;
  finally
    free;
  end;

Por otra parte en el TAgregarUnidad tengo dos botones, uno Aceptar que le asigno el valor mrOk y otro Cancelar al que le asigno mrCancel.

No sé donde puede estar el fallo, claro que voy aprendiendo Delphi sobre la marcha y no es que sea un experto.

Por otra parte el hilo de Román al que hago mención es este hilo.

Gracias de nuevo...