Delphi - Ventanas Modales (a José Oronas) !!!

El ejemplo está escrito a los apuros. En definitiva, el problema es que el valor del Result en...
Result := ShowModal = mrOk;
...siempre me devuelve Falso. Lo curioso es que con el depurador, en la última línea de la función del OnClick del Aceptar, el valor de ModalResult es mrOk, la siguiente línea vuelve a la asignación anterior, donde el ShowModal no es igual a mrOk.
No se si está claro, en todo caso, avisame.

Gracias por tu atención. Saludos.

Hola Fabian.

A ver si pesco algo. Escribes a la carrera: "en la última línea de la función del OnClick del Aceptar" (sic) significa que por ahí tienes un componente TBitBtn o TButton "Aceptar"???.

De ser cierto lo anterior sospecho que está pasando.

if es el caso then
contestame
else {no hagas nada};

Saludos. G.