Компонет Edit: Как запретить ввод буквенных символов

← →
Ganjo (2003-10-30 18:27) [0]

Привет друзья.
Подскажите пожалуста как в компоненте Edit запретить ввод буквенных символов а позволить только цыфры. я попробывал такой вариант: на событие OnKeyPress прописать if(key<"0") or (key>"9")then Key:=#0; вобще то работает но не работает ни BackSpase ни пробел но ето неудобно. Как мне решить проблему?

← →
Юрий Зотов © (2003-10-30 19:57) [1]

if not (Key in [ #8, " ", "0".."9"]) then Key := #0;

#8 - это BackSpace
" " - пробел, конечно
Остальные нужные клавиши добавьте по вкусу.

← →
Иван Шихалев © (2003-10-30 20:52) [2]

Возник вопрос: а чем TMaskEdit не угодил?

← →
Fay (2003-10-30 22:03) [3]

2Иван Шихалев ©
>>Возник вопрос: а чем TMaskEdit не угодил?
Ты бы ещё TDBGrid переложил.

> Fay (30.10.03 22:03) [3]

Тебе предложу обязательно.

Просто через getwindowlong/setwindowlong добавь стиль ES_NUMBER к своему edit"у. И api сама будет отслеживать символы и выводить тока цифры.

Компонет Edit: Как запретить ввод буквенных символов Найти похожие ветки