powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Навигация в курсорах
8 сообщений из 8, страница 1 из 1
Навигация в курсорах
    #32334706
есть три курсора cur1, cur2, cur3
как перейти на следующую запись у cur2 например
...
Рейтинг: 0 / 0
Навигация в курсорах
    #32334715
Фотография brahew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
sele cur2
if !eof()
step
else
=messageb('posl zp,0,'')
endi
...
Рейтинг: 0 / 0
Навигация в курсорах
    #32334720
на step ругается unrecognized command verb
...
Рейтинг: 0 / 0
Навигация в курсорах
    #32334733
Фотография brahew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
я тупой - не step а skip
...
Рейтинг: 0 / 0
Навигация в курсорах
    #32334838
Бельский
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А как потом получить данные из этого курсора? например есть поле ФИО
...
Рейтинг: 0 / 0
Навигация в курсорах
    #32334847
Flex2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если нужны все записи поля то SELECT FIO FROM CUR2 INTO ....
Если нужно только конкретное значение поля на котором стоит указатель записи, то так :
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Local  lcFIO
select CUR2  
m.lcFIO = FIO
или
Local  lcFIO,loData
select CUR2  
SCATTER NAME loData
m.lcFIO = loData.FIO
...
Рейтинг: 0 / 0
Навигация в курсорах
    #32334904
Por
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Por
Гость
Если рабочую область по каким-либо причинам менять нельзя, то можно и так:

if !eof('cur2')
skip 1 in 'cur2'
endi
...
Рейтинг: 0 / 0
Навигация в курсорах
    #32335030
Спасибо огромное :)
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Навигация в курсорах
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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