Ограничение TEdit на ввод не-цифровой информации

Вставьте следующую строку в обработчик события KeyPress:

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

[000501]

Содержание раздела

---

---