space taste sperren und freigeben ohne onKeyPress

[Cyberbob]

Was spricht gegen:

Delphi-Quellcode:

if Key = ' ' then
begin
  ShowMessage('Hallo Welt!');
end;

Warum wird das Fenster wieder grschlossen? Benutzt du ein normales Formular oder einen Dialog?