Predeterinar boton en Message DLG

[dec]

Hola,

Creo que no se puede hacer lo que precisas: todo está en el código de la función "CreateMessageDialog", que es la utilizada a la hora de mostrar un "MessageDlg".

En una parte del código de la función susomentada puede leerse lo siguiente:

Código Delphi [-]
 if mbOk in Buttons then DefaultButton := mbOk 
 else if mbYes in Buttons then DefaultButton := mbYes 
 else DefaultButton := mbRetry;
 
 if mbCancel in Buttons then CancelButton := mbCancel 
 else if mbNo in Buttons then CancelButton := mbNo 
 else CancelButton := mbOk;

Quiere decirse que el botón predeterminado en el "MessageDlg" no se determina por su orden, pero por su "tipo", y así, al menos utilizando la función "MessageDlg" no podrá determinarse el botón "predeterminado", salvo haciéndolo en función de lo que puede verse en el código anterior.

Bueno. El código anterior, como he dicho, está en la función "CreateMessageDialog" que puede encontrarse en la unidad "Dialogs". Tal vez haciendo algún cambio en dicha función puedas lograr lo que persigues.

Respecto de lo de responderte a tu correo, por favor, lee la guía de estilo de estos Foros: no tendría mucho sentido que aquí se respondiera de forma particular a cada uno de los participantes, puesto que de ese modo no podrían servir ni las preguntas ni las respuestas al resto de participantes, que es de lo que se trata.