Главная страница
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.057 c
1-1099311691
edge
2004-11-01 15:21
2004.11.14
Создание формы.


14-1098805111
Сергей__С
2004-10-26 19:38
2004.11.14
Инсталятор


6-1094570807
pkm
2004-09-07 19:26
2004.11.14
Message


14-1099129581
BRemB
2004-10-30 13:46
2004.11.14
Серийный номер Delphi 5


1-1099041836
Tom
2004-10-29 13:23
2004.11.14
Рисую на форме в Run Time...