В foxpro есть функция для извлечения только чисел из строки или переменной?

Question

В foxpro есть функция для извлечения только чисел из строки или переменной?Пока не нашли?

Answer 1

Вы можете обернуть функции CHRTRAN и получить результат в одну строку кода. Например:

* This can contain numbers, characters, special characters, etc.
m.lcSource = "ABC.1def23-gHI45J!#6KL"

* This is what I want returned back to me.  In this case, it's digits only.
m.lcReturnToMe = "0123456789"

* The inner CHRTRAN() function removes anything that is a number.  The return value is
* what will be removed in the outer CHRTRAN function.
m.lcDigitsOnly = CHRTRAN(m.lcSource, CHRTRAN(m.lcSource, m.lcReturnToMe, SPACE(0)), SPACE(0))

Answer 2

returnstring=''
for i=1 to =len(stringname)
    if isdigit(substr(stringname,i,1))
        returnstring=returnstring+substr(stringname,i,1)
    endif
endfor

?returnstring

Answer 3

Я не думаю, что есть встроенная функция. Я думаю, что вам нужно написать метод, чтобы перебрать вашу строку и использовать ISDIGIT () для извлечения ваших чисел.