Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.06;
Скачать: CL | DM;

Вниз

Помогите с фильтрацией в Edit???   Найти похожие ветки 

 
lkl   (2004-01-24 12:37) [0]

Есть готовый код

IF not (Key in ["1","2","3","4","5","6","7","8","9","0" ]) then Key:=#0;

который учитывает ввод только чисел, а все остальные клавиши игнорирует, как сделать так чтобы он еще учитывал клавишу Backspace, то есть чтобы можно было удалять эти цыфры??


 
lkl   (2004-01-24 13:19) [1]

Подскажите...


 
VaZa   (2004-01-24 13:20) [2]


if not(key in [ #8,"0".."9"]) then key:=chr(0);


 
Александр из Минска ©   (2004-01-24 13:26) [3]

А вставка из буфера обмена проскочит ваши штучки... ТАк что я предлагаю в OnChange посимвольно проверять цифра это, или не цифра!



Страницы: 1 вся ветка

Текущий архив: 2004.02.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.025 c
3-16056
Кирилл_
2004-01-12 15:23
2004.02.06
Поиск с использованием ADOTable. Есть вопрос....


14-16587
Knight
2004-01-10 17:27
2004.02.06
Не могу загрузить комп...


3-16165
Sfera
2004-01-14 07:09
2004.02.06
Интерполяция в тоаблице


3-16164
Wall
2004-01-14 12:00
2004.02.06
операция со строками


8-16539
nester
2003-10-05 16:18
2004.02.06
Как сохранить TImage в gif?