powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Есть ли такая функция в фоксе?
5 сообщений из 5, страница 1 из 1
Есть ли такая функция в фоксе?
    #36091212
Imperous
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Всем привет!

Есть ли функция (стандарная фоксовская), которая из такой строки:
"0,01 0,03 0,045 0,08 0,06 0,2" (например известно что значений 6 и разделитель между значениями два пробела )
может вытащить значения поочередно
0,01
0,03
0,045
0,08
0,06
0,2

?
...
Рейтинг: 0 / 0
Есть ли такая функция в фоксе?
    #36091229
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
a = "0,01 0,03 0,045 0,08 0,06 0,2"

FOR i =  1  TO GETWORDCOUNT(a, ' ' )
?GETWORDNUM(a, i, ' ')
ENDFOR 
...
Рейтинг: 0 / 0
Есть ли такая функция в фоксе?
    #36091230
Imperous
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
приведу пример, если в listboxе сказать что у него rowsourcetype = value и запихнуть ему в rowsource строку вида "5, 6, 80, 115, 4"
то он покажет именно так как мне надо, но у него разделитель - запятая, а мне надо два пробела
...
Рейтинг: 0 / 0
Есть ли такая функция в фоксе?
    #36091266
прошелмимо
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
Local lcStr, lnTime, laArr[ 1 ]
lcStr = "0,01 0,03 0,045 0,08 0,06 0,2"
For lnTime= 1  to ALines( laArr, lcStr,  4 , " ")
 ? laArr(lnTime)
EndFor 
...
Рейтинг: 0 / 0
Есть ли такая функция в фоксе?
    #36091335
Imperous
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PaulWist,

пасиба!
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Есть ли такая функция в фоксе?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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