Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.033 c
3-1097554515
Xmen
2004-10-12 08:15
2004.11.14
Delphi и Zeosdbo удаление


4-1097004335
Comp
2004-10-05 23:25
2004.11.14
Не появляются подсказки TOOLTIP на TOOLBAR


14-1098794537
Delphin
2004-10-26 16:42
2004.11.14
При переносе текста получаю "?? ???"


14-1099001944
olookin
2004-10-29 02:19
2004.11.14
Я тону в своей безупречности....


1-1099280919
КаПиБаРа
2004-11-01 06:48
2004.11.14
Ошибка в исходниках IBCustomDataSet или в SysUtils?




   Наверх