if QuestionDlg('Suppression...', 'Confirmez la suppression de ce style',
mtCustom, [mrYes, 'Oui', mrNo, 'Non', 'IsDefault'], '') = mrYes then
Valeurs de boutons possibles:
{ ModalResults }
mrNone
mrOK
mrCancel
mrAbort
mrRetry
mrIgnore
mrYes
mrNo
mrAll
mrNoToAll
mrYesToAll
mrClose
mrLast