OnKeyPress verarbeitet ENTER nicht an

[Sugar]

Zitat von Popov:

Stimmt, kann ich bestätigen. Ist aber, wie oben erwähnt, schon etwas länger her. Muss was anderes gewesen sein.

Delphi-Quellcode:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key = VK_RETURN then
    ShowMessage('Schöne Grüße von OnKeyDown');
end;

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = Chr(VK_RETURN) then
    ShowMessage('Schöne Grüße von OnKeyPress');
end;

Auch so gibt es keine Reaktion in der Routine....