Hi,

I'm using a MessageDlg to show some information, with multiple buttons. Unfortunately, in this case, I would like to have another button as default. Is there a way to do this ?

What I have :
if MessageDlg('Attention', 'Data does exist, overwrite ?', mtWarning,[mbNo, mbYes],0) = mrYes then ...

I would like the mbNo to be the default button.

Thanks for any pointers,

Koenraad Lelong.

Do not use Yes/No buttons. Use QuestionDlg and do something like

If QuestionDlg('Attention','Data already exists. What to do', mtWarning,[mrYes,'Overwrite',mrNo,'Keep existing data'])=mrYes then

This is a better dialog, and allows you to put the 'default' answer as mrYes.

Michael.

Thanks Micheal,

Rephrasing my question would have done it also, but that QuestionDlg is more clear, I'm going to use that.
I had never seen that QuestionDlg before.

Koenraad.

Hi,

you can use:

MessageDlg('Attention', 'Data does exist, overwrite ?', mtWarning,[mbNo, mbYes],0, mbNo)

The 6th parameter defines the default button.

Ingo