|
Examples |
|
|
Some examples:
// Close the dialog. procedure MyCustomButtonClickNotify(EurekaExceptionRecord: TEurekaExceptionRecord; var CloseDialog: Boolean); begin CloseDialog := True; end;
// Show a MessageBox. procedure MyCustomButtonClickNotify(EurekaExceptionRecord: TEurekaExceptionRecord; var CloseDialog: Boolean); begin MessageBox(0, 'You have clicked on the HELP button!', 'Information', MB_OK or MB_ICONINFORMATION or MB_TASKMODAL); end; |