[Delphi] Ограничение на ввод. - Форум Cheat-Master.ru
  • Страница 1 из 1
  • 1
Модератор форума: Alowir, Sanoxxx  
Форум » Программирование » Delphi Программирование » [Delphi] Ограничение на ввод.
[Delphi] Ограничение на ввод.
Mewex Дата: Среда, 19.04.2017, 17:46 | Сообщение # 1
STEAM SELLER
Сообщений: 475
Статус: Offline
В свойствах Edit'a выбираем Edit1KeyPress

И пишем ограничение, вот как выглядит допуск ТОЛЬКО на цифры:

Код
if not ((Key in ['0'..'9']) or (Key = #8) or (Key = #13)) then
    Key := #0;
// Для справки #8 - backscape (удаление предыдущего) #13 - enter
Форум » Программирование » Delphi Программирование » [Delphi] Ограничение на ввод.
  • Страница 1 из 1
  • 1
Поиск:
Статистика Форума
Последнии темы
STERN | EAC SPOOFER...
Софт для ВОСПРОИЗВЕДЕНИЯ...
Бесконечное слово
как достать id человека ...
Курилка
Лучший PBN seo сервис и ...
Миллион окон в "SAM...
✅✅✅ПРОДАЖА ВИРТОВ SAMP/C...
Is APK Mirror Safe to Us...
faceit verification
by wereh34 || ...
как смотреть КиноПоиск б...
Читаемые темы
Курилка [10000]
[0.3z][RUS] S0beit mo... [9991]
Поиск CLEO скриптов &... [9977]
Флудильная [9936]
Курилка [9688]
RakBot - Качай аккаун... [9653]
Курилка [9614]
Общение читеров [CM] [9523]
S0beit - pr9n project... [9501]
Часто задаваемые вопр... [8268]
ПОКУПАЮ/ПРОДАЮ ♚SAMP♚... [6360]
[0.3.7][RUS] Sobeit m... [6249]
[FREE] AntiAFK_R 3.4.... [6220]
Лучшие пользователи
Admin [39113]
GеNius [7210]
[CM]Russel [5557]
kenlo763 [4952]
[CM]AGRESSOR [4639]
Snake_Firm [4452]
Сэс [4416]
Artem_Buero [4223]
[CM]Durman [3204]
[CM]Рафаэль [3080]
iMaddy [2855]
sky_Woker [2854]
getrekt [2745]
Новые пользователи
Rava777 [17:39]
tolikberezjuk1 [16:53]
sfrancisko6051731504695 [16:31]
uras70383 [16:24]
asdfghjklzxcvbnmsisk [14:59]
kharitonartem [12:35]
tvtelevizor817 [03:33]
hantemir83 [21:53]
monset [19:56]
sasavot [15:11]
1124kyzya1124 [18:59]
lisicynaelizaveta923 [13:30]
arsensupr [11:20]