![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ComboBox [D6, WinXP]
Goblinus © (2002-03-26 19:52:00)HELP ME, Please!
Как сделать, чтобы в Combobox можно было вводить определённые символы, но при этом также обрабатывались события таких клавиш, как BackSpace, например...
В моёи коде из того, что мне нужно, только BackSpace не обрабатывается:
procedure TForm1.ComboBox2KeyPress(Sender: TObject; var Key: Char);
begin
if (key <"0") or (key > "9") then key:=#0;
end;
Упр. клавиши типа Вверх, Вниз, Delete обрабатываются.
Юрий Зотов (2002-03-26 22:20:00) [1]BackSpace - это #8.
if not (key in [#8, "0".."9"]) then key:=#0;
Вот только незачем дважды подряд задавать один и тот же вопрос.
MBo (2002-03-26 21:23:00) [2]ообрабатывай KeyUp