[M. FM.]

Hola, gluglu:

Muchas gracias por tu respuesta. He probado a hacerlo así, pero ahora no puedo mostrarla con el ShowModal porque me sale un mensaje de error, 'Cannot make a visible window modal'.

Probé a mostrarla con Show, pero entonces no se cierra cuando el usuario pincha en Aceptar. ¿Tengo que poner algo en el procedimiento que devuelve el resultado?

procedure TMensaje.btnAcepClick(Sender: TObject);
begin
  ModalResult := mrOk;
end;

procedure TMensaje.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin
  Action := caFree;
end;

Esos son los procedimientos que tengo, no sé si debería cambiar alguno de ellos.

Saludos y muchas gracias,
M.