powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / field()
11 сообщений из 11, страница 1 из 1
field()
    #33512273
n1m2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Yest komanda field(), eto pokazivaet polya po nomeram.
Dopustim, field(1)=1-ci polya,field(2)=2-ci polya.

A yest li takaya kamanda chto pokazivala nomer polya po nazvaniyu?
...
Рейтинг: 0 / 0
field()
    #33512290
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно так:
AFIELDS(aDim1)
lnColumn = ASCAN(aDim1, NameFiled,1,0,1,9), где
NameFiled имя искомого поля, а lnColumn - его искомый номер
С уважением, Алексей
...
Рейтинг: 0 / 0
field()
    #33512302
n1m2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Oshibku dayut: "Too many argument"
...
Рейтинг: 0 / 0
field()
    #33512307
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А какая версия VFP ?
С уважением, Алексей
...
Рейтинг: 0 / 0
field()
    #33512315
n1m2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
VFP6
...
Рейтинг: 0 / 0
field()
    #33512324
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Тогда так:
AFIELDS(aDim1)
nRow = ASUBSCRIPT(aDim1, ASCAN(aDim1, NameFiled), 1)
nRow - номер поля, но имя поля NameFiled надо задавать большими буквами и лучше сначала убедиться, что ASCAN(aDim1, NameFiled) > 0
С уважением, Алексей
...
Рейтинг: 0 / 0
field()
    #33512358
n1m2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ne, nepravilno dayut.
Napirmer, yest polya ASCAN(aDim1, NameFiled)=4, ya znayu chto nomer etoqo polye 140, no nrow=1 poluchaetsa.
...
Рейтинг: 0 / 0
field()
    #33512437
Фотография Aleksey-K
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не знаю... Я только что проверил - все правильно работает.
Может в VFP 9 эти функции не так работают, как в VFP 6.0?!
С уважением, Алексей
...
Рейтинг: 0 / 0
field()
    #33512962
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Способ сравнения символьных строк зависит от настройки SET EXACT

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
DIMENSION test( 2 )
test[ 1 ] = "1234"
test[ 2 ] = "12"

SET EXACT OFF
?ASCAN(test,"12")

SET EXACT ON
?ASCAN(test,"12")

Вообще-то, при любом раскладе, поиск сведется к перебору. Может, проще органзовать перебор напрямую?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
SELECT MyTab
LOCAL lnI, lcFieldName
lcFieldName = UPPER("MyField")
FOR lnI= 1  TO FCOUNT()
	IF FIELD(m.lnI) == m.lcFieldName
		EXIT
	ENDIF
ENDFOR

IF m.lnI <= FCOUNT()
	?m.lcFieldName," № ",m.lnI
ENDIF
...
Рейтинг: 0 / 0
field()
    #33513127
n1m2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Spasibo, VladimirM, Vsyo poluchilos.
...
Рейтинг: 0 / 0
field()
    #33514823
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Hi n1m2!

Вообще-то настораживает желание получить "номер поля", равно как и
наоборот - возможно что где-то используется кривой алгоритм работы с
данными - при нормальной работе таких потребностей возникать не должно (и
физический порядок следования полей не должен иметь ни малейшего значения
для функционирования программы).

Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / field()
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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