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

Вниз

edit   Найти похожие ветки 

 
проходящий мимо   (2004-10-31 09:38) [0]

Вопрос такой в Edit вводится строка которая может содержат
числ, знаки + * и (). Как проверить что введены именно такие
символы. В случае некорректного ввода, символы не входящие в
допустимые окрашиваются в красный цвет


 
Torin   (2004-10-31 09:57) [1]

Насчёт окрашивания не знаю, а проверить можно так:
for i := 1 to Length(Edit1.Text) do
 if not ( Edit1.Text[i] in["A".."Z","a".."z","1".."2","*","(",")"]  ) then
begin
//Код ввыполняемый в случае некорректного символа
end;



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

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

Наверх




Память: 0.46 MB
Время: 0.03 c
3-1097650762
AZ
2004-10-13 10:59
2004.11.14
Ограничения FireBird


1-1098801779
Виктор
2004-10-26 18:42
2004.11.14
Форма из Bpl вызывает ошибку.


1-1099431497
Kolan
2004-11-03 00:38
2004.11.14
Abstrack Error


1-1099036668
a123
2004-10-29 11:57
2004.11.14
Шрифт в программе


6-1091738810
MeMO
2004-08-06 00:46
2004.11.14
Вопрос по статье "Мониторинг сетей в Delphi"