Ограничение TEdit на ввод не-цифровой информации
Вставьте следующую строку в обработчик события KeyPress:
| if not (Key in [#8,'0'..'9']) then Key := #0; |
Советы по Delphi
Вставьте следующую строку в обработчик события KeyPress:
| if not (Key in [#8,'0'..'9']) then Key := #0; |