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

Вниз

Проверка вхождения цифр   Найти похожие ветки 

 
Uran ©   (2003-06-03 13:36) [0]

Извиняюсь за глупый вопрос, но подскажите пожалуйста , как проверить в string переменной содержит ли она только цифры.
Заранее благодарен! :)


 
WarLord ©   (2003-06-03 13:40) [1]

S: string;
for i:=1 to Length(S) do
if StrToIntDef(S[i],-1)=-1 then
ShowMessage("На позиции "+IntToStr(i)+" не цифра!");


 
Palladin ©   (2003-06-03 13:43) [2]

сума сойти
val + F1


 
Uran ©   (2003-06-03 13:45) [3]

Спасибо большое!:))


 
Зинец Виктор ©   (2003-06-03 14:32) [4]

может и неправильно, но я часто проверяю так:

try
StrToInt (edit.text);
except
raise Exception.Create ("Сколько раз говорить - тут вводят ТОЛЬКО цифры");
end;

%-)


 
Song ©   (2003-06-03 14:36) [5]

2Зинец Виктор © (03.06.03 14:32)
А если там будет 30 цифирь? :)


 
Leo-pro   (2003-06-03 14:40) [6]

for i:=1 to length(s) do
if not(s[i] in ["0".."9"]) then showmassage("Вводи цифры");


 
Palladin ©   (2003-06-03 14:46) [7]

а вот про 30 цифр это уже интересно...
тогда ессно

for i:=1 to Length(S) do
if (byte(s[i])<48) or (byte(s[i])>57) then ShowMessage("На позиции "+IntToStr(i)+" не цифра!");



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

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

Наверх




Память: 0.48 MB
Время: 0.015 c
14-50457
Avers
2003-05-29 20:10
2003.06.16
Не нашел ответа на WinAPI. Попробую здесь


7-50537
jonni
2003-04-12 22:50
2003.06.16
Как запретить открутие папки с файлами под Win98


4-50570
sosv
2003-04-16 10:30
2003.06.16
Установка своего курсора.


1-50362
Pesh
2003-06-04 00:33
2003.06.16
Как отследить появление чужого окна?


14-50462
Malder
2003-05-28 11:52
2003.06.16
Срочно нужен реферат. Тема: