Текущий архив: 2003.10.06;
Скачать: CL | DM;
Вниз
А как сделать, чтобы в TEdit e можно было вводить только цифры? Найти похожие ветки
← →
lovres © (2003-09-23 13:13) [0]сабж...
← →
clickmaker © (2003-09-23 13:15) [1]Использовать TMaskEdit или
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ["0".."9", #8]) then Key:=#0;
end;
← →
lovres © (2003-09-23 13:18) [2]а #8 что за клавиша?
← →
Song © (2003-09-23 13:21) [3]BackSpace
← →
clickmaker © (2003-09-23 13:21) [4]> lovres © (23.09.03 13:18) [2]
Backspace. Если конечно, не хочешь, чтоб было по принципу "юзер ошибается только один раз" :)
← →
lovres © (2003-09-23 13:30) [5]Блин, прикольно получилось, как раз самое то что надо цифры, backspace, delete, стрелки...Спасибо!!!
Страницы: 1 вся ветка
Текущий архив: 2003.10.06;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.024 c
