ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / ComboBox в Grid метод InteractiveChange руками
9 сообщений из 9, страница 1 из 1
ComboBox в Grid метод InteractiveChange руками
    #32740982
Фотография help123
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
help123
Участник
в MyGrid Init вставляю Combo програмно:

This.Column1.AddObject('ComboScrap4k' ,'ComboBox')
This.Column1.ComboScrap4k.Visible = .T.
This.Column1.RemoveObject('Text1')
This.Column1.CurrentControl = 'ComboScrap4k'
This.Column1.Sparse = .T.
This.Column1.ComboScrap4k.RowSourceType=6
This.Column1.ComboScrap4k.RowSource='SCRAP.scraptype'

А как теперь програмно образовать метод этой комбочки InteractiveChange и что-то туда вписать....... что то никак не соображу....
...
Рейтинг: 0 / 0
15.10.2004, 17:12
| Ответить | Цитировать | Написать  
ComboBox в Grid метод InteractiveChange руками
    #32741011
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
This.Column1.ComboScrap4k.WriteMethod(cMethodName, cMethodText, lCreateMethod)
...
Рейтинг: 0 / 0
15.10.2004, 17:27
| Ответить | Цитировать | Написать  
ComboBox в Grid метод InteractiveChange руками
    #32741038
Фотография help123
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
help123
Участник
пишет Variable 'InteractiveChange' not found

я имею ввиду: в обычной комбочке, не встроеной в Грид, есть метод InteractiveChange где можно чтото вписать и оно будет действовать во время выбора значений комбы.

как тоже самое сделать с комбой встроеной в Гриде

С уважением, help
...
Рейтинг: 0 / 0
15.10.2004, 17:40
| Ответить | Цитировать | Написать  
ComboBox в Grid метод InteractiveChange руками
    #32741039
Dushes
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dushes
Гость
help123в MyGrid Init вставляю Combo програмно:

This.Column1.AddObject('ComboScrap4k' ,'ComboBox')
This.Column1.ComboScrap4k.Visible = .T.
This.Column1.RemoveObject('Text1')
This.Column1.CurrentControl = 'ComboScrap4k'
This.Column1.Sparse = .T.
This.Column1.ComboScrap4k.RowSourceType=6
This.Column1.ComboScrap4k.RowSource='SCRAP.scraptype'

А как теперь програмно образовать метод этой комбочки InteractiveChange и что-то туда вписать....... что то никак не соображу....

Для восьмерки я бы лучше сделал так:

Код: plaintext
BINDEVENT(This.Column1.ComboScrap4k, "InteractiveChange", Thisform, "m_ComboScrap4kInteractiveChange", 0)
Соответственно придется добавить метод m_ComboScrap4kInteractiveChange в саму форму, который и будет перехватывать твое событие у ComboScrap4k
С уважением
duШes
....return ThisForm.exGrid1.p_oColumns("COLUMN1").M_AddHeader("header4",4)
...
Рейтинг: 0 / 0
15.10.2004, 17:40
| Ответить | Цитировать | Написать  
ComboBox в Grid метод InteractiveChange руками
    #32741042
Dushes
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Dushes
Гость
Поправочка - BINDEVENT добавляешь сразу же после добавления combo в обработке события INIT...ну я думаю ты и сам догадался ;)

С уважением
duШes
....return ThisForm.exGrid1.p_oColumns("COLUMN1").M_AddHeader("header4",4)
...
Рейтинг: 0 / 0
15.10.2004, 17:41
| Ответить | Цитировать | Написать  
ComboBox в Grid метод InteractiveChange руками
    #32741066
Фотография help123
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
help123
Участник
прошу прощения за детский вопрос: а куда добавить в форму этот новый метод?
...
Рейтинг: 0 / 0
15.10.2004, 17:53
| Ответить | Цитировать | Написать  
ComboBox в Grid метод InteractiveChange руками
    #32741304
Фотография help123
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
help123
Участник
В форме пишу:

PROCEDURE m_ComboScrap4kInteractiveChange
..........
..........
RETURN

пишет ошибку - methods and events cannot contain nested procedures or class definitions

Подскажите неопытному как правильно и где написать...
...
Рейтинг: 0 / 0
15.10.2004, 22:33
| Ответить | Цитировать | Написать  
ComboBox в Grid метод InteractiveChange руками
    #32741337
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Igor Korolyov
Участник
Делаешь свой собственный класс производный от комбо, и уж его и добавляешь.
В классе есно прописываешь что надо в InteractiveChange.
"программно добавить код" невозможно. Можно привязать некоторое событие
(например тот-же InteractiveChange) к другому (существующему!) методу о чём
и говорил Dushes. Можно в совём классе прописать вызов динамически
формируемой процедуры (в VFP6SP3 появился COMPILE для рантайма, в VFP7 -
ExecScript) - но это всё надо если ты действительно не можешь одойтись
СТАТИЧНЫМ кодом обработчика.

Posted via ActualForum NNTP Server 1.0
...
Рейтинг: 0 / 0
16.10.2004, 00:37
| Ответить | Цитировать | Написать  
ComboBox в Grid метод InteractiveChange руками
    #32741881
Фотография help123
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
help123
Участник
Igor Korolyov
Делаешь свой собственный класс производный от комбо, и уж его и добавляешь.
В классе есно прописываешь что надо в InteractiveChange.
"программно добавить код" невозможно. Можно привязать некоторое событие
(например тот-же InteractiveChange) к другому (существующему!) методу о чём
и говорил Dushes. Можно в совём классе прописать вызов динамически
формируемой процедуры (в VFP6SP3 появился COMPILE для рантайма, в VFP7 -
ExecScript) - но это всё надо если ты действительно не можешь одойтись
СТАТИЧНЫМ кодом обработчика.

Posted via ActualForum NNTP Server 1.0

Спасибо за помощь, все таки догнал !!! Обошелся статичным кодом обработчика
...
Рейтинг: 0 / 0
17.10.2004, 23:56
| Ответить | Цитировать | Написать  
9 сообщений из 9, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / ComboBox в Grid метод InteractiveChange руками
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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