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