powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Работа с переменной
10 сообщений из 10, страница 1 из 1
Работа с переменной
    #33844620
"Эля
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Есть переменная которая содержит цифры и пробелы '99 6599 2 23 1'
Примерно так и данные которые надо по порядку сложить с числами разделенными пробелом, т.е. пробел в переменной задает новое число. Подскажите как сделать-ума не приложу
...
Рейтинг: 0 / 0
Работа с переменной
    #33844628
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
?eval(chrtran("99 6599 2 23 1"," ","+"))
...
Рейтинг: 0 / 0
Работа с переменной
    #33844890
"Эля
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
нет я не правильно наверно объяснила. Само число берется из таблицы и значения переменной нужно складывать не между собой а между этими данными из таблицы и числами из переменной
...
Рейтинг: 0 / 0
Работа с переменной
    #33844927
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
"Элянет я не правильно наверно объяснила. Само число берется из таблицы и значения переменной нужно складывать не между собой а между этими данными из таблицы и числами из переменной
Кто увидел слово "таблица" в первом посте? Я - нет
См. GETWORDNUM()
...
Рейтинг: 0 / 0
Работа с переменной
    #33844951
Станислав C.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
"Элянет я не правильно наверно объяснила. Само число берется из таблицы и значения переменной нужно складывать не между собой а между этими данными из таблицы и числами из переменной

Тогда примерно так (tab1-твоя таблица, tab1.sum-поле таблицы с изменяемыми данными):
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
s='99 6599 2 23 1'

use tab1
go top

scan
  n=at(" ",s)
  if n> 0 
    t=val(substr(s, 1 ,n- 1 ))
    s=substr(s,n+ 1 )
  else
    t=val(s)
    s="0"
  endif
  replace tab1.sum with tab1.sum+t
endscan
...
Рейтинг: 0 / 0
Работа с переменной
    #33845000
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
l=chrtran("99 6599 2 23 1"," ",CHR( 13 ))
ALINES(lArr,l)
for i=  1  to ALEN(lArr)
   h=lArr(i)+<FieldName>   && Или что ты хочешь сделать
next
...
Рейтинг: 0 / 0
Работа с переменной
    #33845007
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AleksMed
Код: plaintext
1.
h=lArr(i)+<FieldName>   && Или что ты хочешь сделать

Поправочка :)
h=VAL(lArr(i))+<FieldName> && Или что ты хочешь сделать
...
Рейтинг: 0 / 0
Работа с переменной
    #33845035
&quot;Эля
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо именно то что нужно
...
Рейтинг: 0 / 0
Работа с переменной
    #33846489
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi AleksMed!

У функции ALINES уже давно (по крайней мере в VFP7 уже точно есть) имеется
параметр указывающий какие символы она считает за "разделители строк" - так
что -1 строка. Кроме того сама ALINES() возвращает число получившихся
"строк" - так что и без ALEN() можно обойтись :)

Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
Работа с переменной
    #33846549
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Igor Korolyov

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


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