Советы по Delphi

Ограничение TEdit на ввод не-цифровой информации


Вставьте следующую строку в обработчик события KeyPress:

    if not (Key in [#8,'0'..'9']) then Key := #0;
[000501]



Содержание раздела