Как в Delphi можно ограничить ввод нечисловых значений в компонент редактирования целых чисел?

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

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

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

Чтобы реализовать ограничение, нужно: delphi-manual.ru

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

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

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