Voici ce que je fais :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
  if MessageDlg('Voulez-vous faire un décodage de plan ou une recherche des classes d''équivalences ?'+#13
                +#13
                +'Oui = décodage de plan'+#13
                +'Non = classes d''équivalences',
                mtConfirmation, [mbYes, mbNo], 0) = mrYes
    then TypeExercice := 'p'
    else TypeExercice := 'ce';
Ben, j'aimerai avoir la même chose mais avec comme bouton directement les réponses au lieu de "oui" et de "non"

Comment je fais pour personnaliser les boutons d'un MessageDlg ?
ou
Existe-t-il une autre solution que de créer une nouvelle forme ?

Merci,

David.