TMsgButtonClickEvent = procedure (Sender: TObject; Button: TMsgDlgBtn) 

Событие нажатия кнопки в окне сообщения.

Параметры:

• Sender - источник события.
• Button - нажатая кнопка.

Ссылки: TdxForm.MessageDlg