Чтобы ограничить ввод нечисловых значений в компонент редактирования целых чисел в Delphi, можно использовать обработчики событий KeyPress и KeyUp компонента Edit. 15

Первая процедура не допускает появления нежелательных символов, то есть любых, не равных цифре или символу-разделителю целой и дробной частей числа. 15 Для этого используется встроенная в Delphi константа DecimalSeparator, содержащая нужный символ. 15

Вторая процедура приводит вводимое число к привычному, общеупотребительному виду. 15 Например, не допускает появления числа, у которого символ-разделитель — первый из символов. 15

Чтобы реализовать ограничение, нужно: 5

1. Положить на форму компонент Edit. 5
2. Открыть вкладку Events в Инспекторе Объектов и дважды щёлкнуть по обработчикам событий OnKeyPress и OnKeyUp компонента Edit. 5
3. Создать заготовки обработчиков этих событий. 5
4. Заменить обработчики предлагаемыми процедурами. 5

После этого компонент Edit сможет содержать только числа. 5

Если компонентов несколько, то достаточно создать одну пару предлагаемых процедур для одного из них, а к остальным подключить их, выбрав в Инспекторе Объектов в качестве обработчиков соответствующих событий. 15