(CodeLib-Manager)
Registriert seit: 10. Jun 2002
4.648 Beiträge
Delphi XE Professional
|
11. Jun 2002, 23:11
Hi,
Das geht so:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if Key = Char(VK_RETURN) then
begin
Key := #0;
// Bewirkt, dass die Taste nicht weitergeleitet wird
// und somit wird das Beep unterdrückt.
end;
end;
Thomas
|