Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.12;
Скачать: CL | DM;

Вниз

Звук при нажатии клавиши   Найти похожие ветки 

 
TimScorp ©   (2006-02-26 20:44) [0]

Доброго времени суток!

Вопрос в следующем. На форме есть TLabeledEdit. Ставлю обработчик событий на KeyPress:

if Key = #13 then
 BitBtn1Click(Sender);

При выполнении приложения после нажатия клавиши Enter раздается неприятный звуковой сигнал. Возможно ли этот сигнал отключить???

С уважением TimScorp.


 
jack128 ©   (2006-02-26 20:53) [1]

TimScorp ©   (26.02.06 20:44)
procedure TForm1.LabeledEdit1KeyPress(Sender: TObject; var Key: Char);
begin
 if Key = #13 then
 begin
   BitBtn1Click(Sender);
   Key := #0;
 end;
end;


 
TimScorp ©   (2006-02-26 20:59) [2]

Спасибо большое

С уважением TimScorp.



Страницы: 1 вся ветка

Текущий архив: 2006.03.12;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.029 c
2-1141019440
Паскаленок
2006-02-27 08:50
2006.03.12
Вопрос по TDateTiMePicker


2-1141044851
dera
2006-02-27 15:54
2006.03.12
как сделать исключение для SQL-запроса?


2-1140364943
Yaffil
2006-02-19 19:02
2006.03.12
SQL: Как узнать содержимое конкретной ячейки?


2-1140305836
Дмитрий_177
2006-02-19 02:37
2006.03.12
Переменные в моей функции


3-1137760737
Stanislav
2006-01-20 15:38
2006.03.12
Работа со временной таблицей