Тема: запрет ввода букв в Memo
Показать сообщение отдельно
  #4  
Старый 25.07.2013, 17:31
Аватар для Mrak
Mrak Mrak вне форума
Местный
  
Регистрация: 26.01.2013
Адрес: МО
Сообщения: 438
Версия Delphi: XE2
Репутация: 17
По умолчанию
в OnKeyPress прописать
Код:
if not (Key in ['0'..'9']) then Key := #0;

Почему сразу изврат? Такие случаи бывают. Защита от дурака-пользователя (или дуры)
__________________
Я за здоровый экстрим!
Спасибо за "спасибо")