Réponse acceptée !
Oui, mais il faut utiliser MessageDlg.
L'aide te donnera l'ordre des paramètres à passer.
MessageDlg('Aucun canal sélectionné',mtWarning, [mbOK], 0);
If MessageDlg('Bienvenue dans mon application Pascal Objet. Quitter?',
mtConfirmation, [mbYes, mbNo], 0) = mrYes then
MessageDlg('Fin de l''application Pascal Objet.', mtInformation,
[mbOk], 0);