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

SELECT DISTINCT &lcCS FROM (lcTable) INTO array aRow

lTH.Cb1.clear
lTH.Cb1.RowSourceType = 5
lTH.Cb1.RowSource = aRow
lTH.Cb1.refresh()
...
Рейтинг: 0 / 0
Даные в Комбобокс, как загнать???
    #32750286
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здесь проблема с областью видимости переменной (массива) aRow.

Если область видимости переменной не объявлена явно, то ей присваивается область видимости PRIVATE.

Т.е. по завершении метода, где был создан массив он благополучно удаляется из памяти.

Тебе надо сделать пропертю формы типа массив:

ThisForm.AddProperty("aRow[1,1]")

Указание размерности как раз и говорит о том, что данная пропертя - это массив. Можешь создать эту пропертю и вручную: Пункт главного меню Form - Add Property

Далее пишешь такой код:

SELECT DISTINCT &lcCS FROM (lcTable) INTO array ThisForm.aRow

ThisForm.Cb1.RowSourceType = 5
ThisForm.Cb1.RowSource = "ThisForm.aRow"
ThisForm.Cb1.REQUERY()

Для обновления содержимого раскрывающегося списка необходимо использовать не метод Refresh(), а метод Requery(). Хотя, в данном случае - это лишняя команда.
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Даные в Комбобокс, как загнать???
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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