powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Помогите с поиском .....?????
5 сообщений из 5, страница 1 из 1
Помогите с поиском .....?????
    #32611702
ДашаC
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Дорогие ребята, на сегодняшний день VFP набирает обороты...

и многим приходиться учиться программировать в нем,... так что извените за бред ......

1. я создала форму главную и на ней List1 разместила
2. Отображаю данные, все отлично
3. создаю еще одну форму для поиска
4. на главной форме кликаю на кнопку поиск и выходит форма Поиск
но как только я выбираю в этой форме критерий отбора и нажимаю найти, то
в главной форме List1 совершенно не реагирует..

Вопрос: вот код, мне нужно чотбы при нажатии кнопки Найти, форма - Поиск

закрылась, а на главной форме указатель встал на найденную запись(нужную)

n1=thisform.text1.value
n2=thisform.text2.value

SELECT table1
LOCATE FOR table1.pole1=n1 AND table1.pole2=PADR(ALLTRIM(n2),7," ")
IF FOUND()=.T.
lnZap=RECNO()
lnZapN=table1.nn
Form_glav.list1.value=RECNO()
else
MESSAGEBOX('no !!!!')
ENDIF
ENDIF
thisform.Release
...
Рейтинг: 0 / 0
Помогите с поиском .....?????
    #32611746
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
List1 - это имеется в виду объект ListBox или Grid ?

Указанный способ позиционирования сработает для Grid, а для ListBox в качестве Value указывается одно из двух значений:

-) Содержимое столбца указанного в свойстве BoundColumn
-) Порядковый номер элемента в отображаемом списке

Что именно будет использовано в качестве Value по умолчанию определяется типом данных в ControlSource. Если это свойство не задано, то явным указанием Value при инициализации объекта. Если Value не указан, то предполагается, что это пустая символьная строка.

Скорее всего, у тебя в качестве Value используется именно символьная строка. Поэтому и надо присвоить не значение Recno(), а значение текущих полей записи, что-то вроде:

Form_glav.list1.value = table1.pole1
...
Рейтинг: 0 / 0
Помогите с поиском .....?????
    #32611783
ДашаС
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да именно в главной форме я использую ListBox

и в RowSource я просто написала перечисление полей, их там несколько

RowSource=Table.pol2, table1.pole2 и.т.д.
а в RowSourceType=6
...
Рейтинг: 0 / 0
Помогите с поиском .....?????
    #32611812
ДашаС
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я написала Form_glav.list1.value = table1.pole1, но

все равно указатель в главной форме не становиться на запись, точнее

становиться только вот не выделяет ее....,,,,??????
...
Рейтинг: 0 / 0
Помогите с поиском .....?????
    #32611824
ДашаС
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибочки ВладимирМ, я все поняла и все заработало....
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Помогите с поиском .....?????
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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