![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как избавиться от системного beep?
cosinus © (2002-10-15 16:37:00)У меня на форме есть два edit-а. После заполнения Edit1 и нажатии на Enter я ставлю Edit2.SetFocus. Вопрос: как избавится от характерного beep при переходе (или, что скорее, при нажатии на Enter)?
Song (2002-10-15 16:43:00) [1]Обработать TEdit.onKeyPress и вернуть Key:=#0 во всех требуемых случаях.
kerk (2002-10-15 16:43:00) [2]В OnKeyPress
if Key = #13 then
begin
Key := #0; //убираем
Windows.SendMessage(Handle, WM_NEXTDLGCTL, 0, 0); //перейти на следуйщий контрол
end;