MessageDlg mit falschem Default

[Jasocul]

Zitat von Redeemer:

Folgender Code funktioniert zwar in XE2, bringt einen aber in vorherigen Versionen in große Schwierigkeiten, wenn der Nutzer auf die Idee kommt, Esc zu drücken oder auf X zu klicken und sich wundert, warum alle Dateien weg sind.

Delphi-Quellcode:

if MessageDlg('Möchten Sie alle Dateien auf ihrem Computer löschen?', mtWarning, mbYesNo, 0) = mrNo then Exit;
LöscheAlleDateien();

Da ich andere Erfahrungen gemacht habe, habe ich das gerade einfach mal geprüft.
Was du schreibst, stimmt nicht!
Wer das [X] auswählt, bekommt ein mrCancel! Auch in XE2.

Allerdings war ich verblüfft, dass ein ESC ein mrNo liefert. Das ist auch nicht zwangsläufig das korrekte/erwünschte Ergebnis.