Вниз
Скачать: CL | DM;

правильный поиск в строке   Найти похожие ветки 

 
vigo_   (2006-10-13 13:41) [0]

Добрый день, вопрос по поиску в строке. Есть необходимость проверки первых символов строки, в которой должен быть указан почтовый индекс. Если пользоваться StrToInt(первых шести символов) и попадается не 0..9, то возникает Except, к тому же в некоторых случаях почтовый индекс пишется в скобках. Таким образом, нужно сначала проверить первые два символа и проверка if ((s[1] <> "0" or ... or s[1] <> "9")) or (s[2] <> "0" or ... or s[2] <> "9")) then ... выглядит некрасиво. Как корректно проверить наличие последовательности цифр в строке?


 
Elen ©   (2006-10-13 14:02) [1]


>  Если пользоваться StrToInt(первых шести символов) и попадается
> не 0..9, то возникает Except,

Как вариант это можно поместить в try except. Можно еще StrToIntDef использовать


 
stone ©   (2006-10-13 14:25) [2]

if not TryStrToInt(LeftStr(s), intValue) then


 
stone ©   (2006-10-13 14:25) [3]

if not TryStrToInt(LeftStr(s,6), intValue) then


 
vigo_   (2006-10-13 14:38) [4]

StrToIntDef - помогло спасибо,  сейчас TryStrToInt посмотрю
Спасибо всем


 
han_malign ©   (2006-10-13 15:16) [5]

еще Val посмотри и (s[i] in ["0".."9"])



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

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



Память: 0.46 MB
Время: 0.028 c
15-1160381006
i-am-vladko
2006-10-09 12:03
2006.10.29
Проблемы с Zeos - не ставится под Delphi 5


4-1150295473
Jolik
2006-06-14 18:31
2006.10.29
Заменить залокированный системой файл...


3-1157004484
TohaNik
2006-08-31 10:08
2006.10.29
Русский шрифт в поле таблицы.


2-1160829897
Sorvanets
2006-10-14 16:44
2006.10.29
Нужна программа тестирования


3-1157437612
svt
2006-09-05 10:26
2006.10.29
!!!!ADOStoredProc1 !!!!Объясните, пожайлуста, где я ошибся




   Наверх