powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Форма - "Поиск"
4 сообщений из 4, страница 1 из 1
Форма - "Поиск"
    #33475591
air1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Для поиска записи в таблице существует команда Locate for, а для продолжения поиска continue. Мне бы хотелось исполюзуя эти команды написать формочку "Поиск", но которая будет искать не в таблице, а в гриде, причем в грид у меня выводятся данные за определенный месяц. Внимание вопрос: как мне отразить найденную в таблице запись в гриде?
...
Рейтинг: 0 / 0
Форма - "Поиск"
    #33475617
Фотография Владимир СА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
air1Для поиска записи в таблице существует команда Locate for, а для продолжения поиска continue. Мне бы хотелось исполюзуя эти команды написать формочку "Поиск", но которая будет искать не в таблице, а в гриде, причем в грид у меня выводятся данные за определенный месяц. Внимание вопрос: как мне отразить найденную в таблице запись в гриде?Скорее всего у тебя таблица привязана к Grid-у. Следовательно при поиске в таблице нужной записи (когда ты ее нашел) просто Grid.Refresh
...
Рейтинг: 0 / 0
Форма - "Поиск"
    #33475618
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
if found()
go recno()
endif
...
Рейтинг: 0 / 0
Форма - "Поиск"
    #33476019
S866
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
то AleksMed
если found() - то найденая запись уже текущая - go recno() ненадо

Код: plaintext
1.
2.
3.
4.
5.
seek 'dfhvh'
if found()
  thisform.grid1.refresh
else
 =messagebox('запись не найдена', 16 ,'error')
endif
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Форма - "Поиск"
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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