Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / seek / 5 сообщений из 5, страница 1 из 1
10.08.2006, 10:33
    #33909831
Mihran
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
seek
privet. mne ydajotsya spomoshju seek naiti tot zapis kotori mne nujen,no pereiti k sledujushei zapisi kotori udavletvarjaet tu je usloviju ne udajotsya. pomogite pojolusta.
...
Рейтинг: 0 / 0
10.08.2006, 10:37
    #33909840
-=AlexiS=-
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
seek
skip / scan / locate - в зависимости от условий задачи, данных , индексного выражения
...
Рейтинг: 0 / 0
10.08.2006, 10:40
    #33909844
vkluch
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
seek
если seek .T. то далее просто проверяйте записи на соответствие вашему условию.
i=0
nnn=yslovie
seek nnn
do while field=nnn and !eof()
i=i+1
skip
enddo
...
Рейтинг: 0 / 0
10.08.2006, 11:31
    #33909987
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
seek
Вместо цикла DO WHILE + SKIP разумнее пользоваться циклом SCAN

Код: plaintext
1.
2.
3.
4.
5.
6.
SELECT MyTab
SET ORDER TO "нужный индекс"
=SEEK("условие")
SCAN WHILE "выражение нужного индекса" = "условие"
	* Обработка ВСЕХ записей удовлетворяющих "условию"
ENDSCAN

После SEEK() никаких дополнительных проверок или обработок делать не надо, поскольку цикл SCAN WHILE начнет работу от текущей записи. Т.е. от той записи которая была найдена по SEEK()
...
Рейтинг: 0 / 0
10.08.2006, 11:40
    #33910021
vkluch
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
seek
Согласен.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / seek / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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