Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / проверка строки / 20 сообщений из 20, страница 1 из 1
13.09.2007, 09:46
    #34796480
Ирыч
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Подскажите, плиз!

Какой функцией можно проверить строковое выражение на содержание в ней только цифр?

Спасибо.
...
Рейтинг: 0 / 0
13.09.2007, 09:51
    #34796492
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
?IIF(LEN(cStr)=CHRTRAN(cStr,CHRTRAN(cStr,"0123456789",""),""),.T.,.F.)
...
Рейтинг: 0 / 0
13.09.2007, 09:52
    #34796497
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Поправка:
?IIF(LEN(cStr)=LEN(CHRTRAN(cStr,CHRTRAN(cStr,"0123456789",""),"")),.T.,.F.)
...
Рейтинг: 0 / 0
13.09.2007, 09:54
    #34796507
проверка строки
Ну, Саша, ты и отжег!!!

Код: plaintext
1.
2.
3.
?LEN(cStr)=CHRTRAN(cStr,CHRTRAN(cStr,"0123456789",""),"")
?Val(cStr)!= 0   && если, конечно,  0  не является возможным вариантом
?isnumeric()
...
Рейтинг: 0 / 0
13.09.2007, 10:01
    #34796522
проверка строки
Впрочем, я сам не лучше.
Вместо isnumeric() читать isdigit()
...
Рейтинг: 0 / 0
13.09.2007, 10:02
    #34796529
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
проходящий.Ну, Саша, ты и отжег!!!

Код: plaintext
1.
2.
3.
?LEN(cStr)=CHRTRAN(cStr,CHRTRAN(cStr,"0123456789",""),"")
?Val(cStr)!= 0   && если, конечно,  0  не является возможным вариантом
?isnumeric()

Ну первое - это соптимизированный мой вариант.
Второе - не гарантирует правильность.
Третье - где ты это взял.
...
Рейтинг: 0 / 0
13.09.2007, 10:04
    #34796535
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
AleksMed проходящий.Ну, Саша, ты и отжег!!!

Код: plaintext
1.
2.
3.
?LEN(cStr)=CHRTRAN(cStr,CHRTRAN(cStr,"0123456789",""),"")
?Val(cStr)!= 0   && если, конечно,  0  не является возможным вариантом
?isnumeric()

Ну первое - это соптимизированный мой вариант.
Второе - не гарантирует правильность.
Третье - где ты это взял.
Если почитать про ISDIGIT(), как и про ISALPHA(), то лучше их не использовать в данном случае.
...
Рейтинг: 0 / 0
13.09.2007, 10:06
    #34796538
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
проходящий.Ну, Саша, ты и отжег!!! ... Зря ты так. Мысль хорошая, реализация чуть покачала:
Код: plaintext
CHRTRAN(cStr,"0123456789","") == ""
...
Рейтинг: 0 / 0
13.09.2007, 10:07
    #34796545
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Dima T проходящий.Ну, Саша, ты и отжег!!! ... Зря ты так. Мысль хорошая, реализация чуть покачала:
Код: plaintext
CHRTRAN(cStr,"0123456789","") == ""

Димка всех соптимизировал
...
Рейтинг: 0 / 0
13.09.2007, 10:23
    #34796589
Alex_Ts
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
1) VAL(cStr) > 0 && цифры
2) VAL(cStr) = 0 && не все цифры

правда строку из 0 (ноль) определит как вариант 2
...
Рейтинг: 0 / 0
13.09.2007, 10:29
    #34796609
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Alex_Ts1) VAL(cStr) > 0 && цифры
2) VAL(cStr) = 0 && не все цифры

правда строку из 0 (ноль) определит как вариант 2
?VAL("1a2b")
...
Рейтинг: 0 / 0
13.09.2007, 10:31
    #34796625
Ирыч
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Всем спасибо.
В моем случае меня устроило Val(str) (Как сама не догадалась )
...
Рейтинг: 0 / 0
13.09.2007, 10:32
    #34796626
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Alex_Ts1) VAL(cStr) > 0 && цифры
2) VAL(cStr) = 0 && не все цифры

правда строку из 0 (ноль) определит как вариант 2Не угадал :)
Код: plaintext
1.
val('12we') =  12 
val('12e45345') = ошибка "Numeric overflow"
...
Рейтинг: 0 / 0
13.09.2007, 10:33
    #34796631
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
ИрычВсем спасибо.
В моем случае меня устроило Val(str) (Как сама не догадалась )
Всё таки они странные ... эти женщины
...
Рейтинг: 0 / 0
13.09.2007, 10:34
    #34796635
Ирыч
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Dima T Alex_Ts1) VAL(cStr) > 0 && цифры
2) VAL(cStr) = 0 && не все цифры

правда строку из 0 (ноль) определит как вариант 2Не угадал :)
Код: plaintext
1.
val('12we') =  12 
val('12e45345') = ошибка "Numeric overflow"


Опс!! Беру слова обратно.
...
Рейтинг: 0 / 0
13.09.2007, 10:36
    #34796641
Ирыч
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Dima T Alex_Ts1) VAL(cStr) > 0 && цифры
2) VAL(cStr) = 0 && не все цифры

правда строку из 0 (ноль) определит как вариант 2Не угадал :)
Код: plaintext
1.
val('12we') =  12 
val('12e45345') = ошибка "Numeric overflow"


Опс!! Беру слова обратно.
...
Рейтинг: 0 / 0
13.09.2007, 10:36
    #34796643
Alex_Ts
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
)))

УШЕЛ ИЗУЧАТ МАТ ЧАСТЬ
...
Рейтинг: 0 / 0
13.09.2007, 10:56
    #34796714
Погодин
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
по мне так лучше:
? TYPE(mystring)='N'
...
Рейтинг: 0 / 0
13.09.2007, 10:58
    #34796725
AleksMed
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
Погодинпо мне так лучше:
? TYPE(mystring)='N'
Опять же
?TYPE("1e12")
...
Рейтинг: 0 / 0
13.09.2007, 11:07
    #34796769
Владимир СА
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
проверка строки
ИрычПодскажите, плиз!
Какой функцией можно проверить строковое выражение на содержание в ней только цифр?
Спасибо.Хотелось бы уточнить. Вы проверяете просто взятую строку или полученную из поля ввода формы? Если второе, то надо ограничивать поле ввода.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / проверка строки / 20 сообщений из 20, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]