Beep-Signal in TEdit unterdrücken |
|
| System | Win9x, WinNT, Win2000, WinXP, Vista, Win7 |
|---|---|
| Ab Delphi-Version | Delphi 1 |
| Letzte Änderung | 28.09.2010 |
Wenn Sie in einem Edit-Feld auf die Return-Taste drücken, ertönt, vorrausgesetzt die Funktion ist in Windows aktiviert, ein Signalton.Um diesen Signalton zu unterdrücken, fangen Sie in dem Edit-Feld die Return-Taste ab. Dies können Sie im OnKeyPress-Ereignis tun:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key = Char(VK_RETURN) then
Key := #0;
end;