В компоненте Edit вводить только цифры

В компоненте Edit набирать только цифры.

Часто возникает необходимость обеспечить в компоненте Edit ввод только цифр (чисел).

Решение:

Надо в событии OnKeyPress для нужного компонента Edit прописать:

if ((Key < '0' || Key > '9') && Key != 8) Key= 0;