Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности
|
|
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
Здравствуйте битых 2 часа уже бьюсь, подскажите кто знает. На форме 4 TMainMenu Как в событии OnClick TMenuItem-а используя Sender добраться до TMainMenu, которому TMenuItem принадлежит? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.03.2003, 19:10 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
Да, еще MainMenu привязаны к ToolBar-ам на форме. Их соответственно тоже 4. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.03.2003, 19:23 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
Рыская по инспектору, вот что нашлось: TToolBar(TMenuItem(Sender).Parent.Owner.Owner).Menu Неужели, только так сложно ? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 14.03.2003, 19:27 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
Код: plaintext или, что то же самое: Код: plaintext ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 15.03.2003, 08:31 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
Именно так я и пытался делать с самого начала. Но такой вызов проходит только с TMenuItem, которые являются основными пунктами главного меню (расположены в строке меню), а вот с пунктами выпадающих меню это не проходит. GetParentMenu возвращает указатель на компонент, имеющий согласно инспектору отладчика пустое имя, а Owner-ом соответствующий ToolBar, однако на попытку раскрыть (.Owner) выдается ошибка Inaccessible value :(( Такая вот непонятная мне петрушка. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.03.2003, 13:38 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
...На форме 4 TMainMenu... А зачем так много ?? Одним нельзя обойтись? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2003, 09:37 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
А что показывает отладчик на: Код: plaintext ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2003, 09:42 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
2 m_kus: TPopupMenu ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2003, 09:45 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
Может я не понимаю? Но ты написал, что не работает на выпадающих меню, но ведь TPopupMenu - выпадающее меню? То есть она правильно делает сслыку на ParentMenu... А тебе что надо получить? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2003, 09:49 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
Может я где-то путанно, но мне надо было получить ссылку на TMainMenu ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2003, 09:52 |
|
||
|
MainMenu и MenuItem
|
|||
|---|---|---|---|
|
#18+
Похоже, я начинаю понимать... Когда ты привязываешь TMainMenu к TToolBar он копирует все элементы меню в кнопки, динамически создавая новые TPopupMenu для всех всплывающих меню - то есть связь с исходным TMainMenu не сохраняется (это действительно уже другое меню с точно такими же пунктами). Таким образом, ссылку на исходное меню можно получить только способом найденным тобой: TToolBar(TMenuItem(Sender).Parent.Owner.Owner).Menu (но Sender уже не является частью этого меню). Могу посоветовать использовать TAction - может проблем будет и меньше... Удачи! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.03.2003, 10:00 |
|
||
|
|
start [/forum/topic.php?fid=58&msg=32120502&tid=2118905]: |
0ms |
get settings: |
4ms |
get forum list: |
10ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
59ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
32ms |
get tp. blocked users: |
1ms |
| others: | 238ms |
| total: | 357ms |
| 0 / 0 |
