NONVCL: Dialog mit ENTER bzw. ESCAPE schliessen

[MathiasSimmack]

Brauchst du nicht. Guckst du mal bei Luckie in die Tutorials rein? Kapitel über Dialoge. ENTER geht, wenn du den Default-Button setzt; sprich: der OK-Button (oder welcher auch immer) muss den Default-Stil haben. Und ESC geht über WM_COMMAND. Habe ich aber gerade nicht zur Hand ... *such*


Oh, there it is:

Zitat:

Ihnen ist sicher bekannt, dass sich die meisten Dialogboxen mit der ESC-Taste einfach schließen lassen. Diese Funktionalität fehlt bisher noch, lässt sich aber recht einfach nachrüsten. Wenn Sie auf ESC drücken, sendet das System die Nachricht "WM_COMMAND". Der wParam enthält dann den Wert IDCANCEL, so dass Sie nur wie folgt reagieren müssen:

Delphi-Quellcode:

WM_COMMAND:
  if(wParam = IDCANCEL) then SendMessage(hDlg,WM_CLOSE,0,0)
    else { ... }

Mehr ist nicht erforderlich.

Is´ nämlich sogar von mir, der Absatz, frech reingeschrieben ... und Luckie kriegt immer das Lob für so was.