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