Как избавиться от звука при нажатии Enter в Edt1 ?

← →
Иван1 (2004-06-09 09:30) [0]

Нужно, чтобы при нажатии клавиши Enter строка из Edit заносилась
в ListBox, но при этом раздается стандартный звук Windows. Как
его подавить?

← →
Creator © (2004-06-09 10:41) [1]

используй TMemo ...

← →
evvcom © (2004-06-09 10:44) [2]

Отключить звуки. Если они меня раздражают, то я их отключаю (частично или полностью), если нравятся, то наслаждаюсь.

← →
Silver Alex © (2004-06-09 10:46) [3]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key=#13 then
key:=#0;
end;

← →
ligor (2004-06-09 11:02) [4]

systemparametersinfo(spi_setbeep,0,nil,0); //выключить
Такой вариант мне нравиться больше