|
|
|
Регистрация Восстановить пароль |
|||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
Опции темы | Поиск в этой теме |
28.08.2009, 16:18
|
#1 |
|
кривокодер ;)
Форумчанин
Регистрация: 20.06.2008
Сообщений: 707
|
TRzGroupBar - popup на итемы
Здравствуйте, уважаемые!
Подскажите, как на итем в TRzGroup (дочерний от TRzGroupBar) повесить попап-меню? На TRzGroup и TRzGroupBar меню вешается элементарно, а вот на сам итем повесить не смог... Подскажите, как? Заранее благодарен!
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид} |
|
|
|
28.08.2009, 16:20
|
#2 |
|
Trust no one.
Старожил
Регистрация: 07.04.2009
Сообщений: 6,526
|
В OnMouseUp:
If Button = mbRight Then If ВыбраннаяВещь = НужнаяВещь Then PopupMenu.Popup(X,Y); На всякий случай можно еще делать проверку на нахождение мыши на территории меню: If (X>TRzGroup.Left) And (X<TRzGroup.Left+TRzGroup.Height) And (Y>TRz.Top) And (Y<Trz.Top+Trz.Width) Then ...
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ |
|
|
|
|
28.08.2009, 16:37
|
#3 |
|
кривокодер ;)
Форумчанин
Регистрация: 20.06.2008
Сообщений: 707
|
у итемов нет события OnMouseUp
 только OnClick...
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид} |
|
|
|
|
28.08.2009, 16:43
|
#4 |
|
Trust no one.
Старожил
Регистрация: 07.04.2009
Сообщений: 6,526
|
Так не на итем а на TRzGroup!
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ |
|
|
|
|
28.08.2009, 20:43
|
#5 |
|
кривокодер ;)
Форумчанин
Регистрация: 20.06.2008
Сообщений: 707
|
Разобрался... капец!
Попап на итем назначается в разделе событий (!!!) объекта TRzGroup Мне б такого плана, который автор курил пока этот компонент писал... =\
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид} |
|
|
|
|
28.08.2009, 21:01
|
#6 |
|
кривокодер ;)
Форумчанин
Регистрация: 20.06.2008
Сообщений: 707
|
Вопрос тогда другой...
Как теперь определить итем, который вызвал попап (точнее его заголовок или индекс)? TRzGroup(Sender).SelectedItem.Capti on - не работает, возвращает пустую строку... TRzGroupItem(Sender).Caption - то же самое =\
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид} |
|
|
|
|
28.08.2009, 21:28
|
#7 |
|
кривокодер ;)
Форумчанин
Регистрация: 20.06.2008
Сообщений: 707
|
Извиняюсь за раннюю панику
 Отловил по GroupFr.PopupItem.Caption
"А как написать праграму?, "ришыти задачьку очинь нада" ©с форума. Жить становится интереснее, жить становится веселее...
{Быть или не быть} {Неуспешный суицид} |
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Popup | DeDoK | Общие вопросы Delphi | 7 | 06.06.2009 15:10 |
| TRzGroupBar | Johnson | Компоненты Delphi | 7 | 24.10.2008 22:19 |
| Popup+dbGrid | s.mag | БД в Delphi | 8 | 15.05.2008 13:32 |
| popup в dbgrid | drakhar | БД в Delphi | 7 | 13.02.2008 08:20 |
| Popup menu | Mitron | Компоненты Delphi | 1 | 02.02.2008 14:26 |
