Widgetset-independent implementation.
Source position: dialogs.pp line 728
function DefaultMessageBox(
Text: PChar;
Caption: PChar;
Flags: LongInt
):Integer;
MessageDlg
Shows a message to the user and gets the response.