Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.10.09;
Скачать: CL | DM;

Вниз

Как работать с динамически созданным popup ом   Найти похожие ветки 

 
Exterr   (2011-06-17 18:46) [0]

Доброго...
В программке при запуске создаются кнопки, менюшки. Содержимое popup"ов создается при клике.
Так вот собственно вопрос какой. После каждого создания/пересоздания пунктов нужно обратиться к PopupMenu с которым мы работаем. Как это сделать? Попробовал после создания пунктов запускать цикл перебирающей все компоненты на форме, но что-то не получается.

 for i := 0 to form1.ComponentCount - 1 do
   if (form1.Components[i] is TPopupMenu) then
     ...
     перерисовываем popupmenu
     ...  
 end;


 
Inovet ©   (2011-06-17 20:42) [1]

Четыре раза прочитал - ничё не понял.


 
Exterr   (2011-06-17 21:03) [2]


> Четыре раза прочитал - ничё не понял.


Попробую по другому:) Зная TMenuItem можно как-то узнать какому TPopupMenu он принадлежит?


 
sniknik ©   (2011-06-17 21:41) [3]

> Как это сделать?
у всех есть "паренты"...

> узнать какому TPopupMenu он принадлежит?
можно, чего нельзя то?

> Попробую по другому:)
попробуй "от задачи", а то так долго мучится будешь... "как не получается", и "по другому"...


 
Германн ©   (2011-06-17 21:45) [4]


> Зная TMenuItem можно как-то узнать какому TPopupMenu он
> принадлежит?

Если создавался так как в примере в хелпе Дельфи, то Owner.


 
Inovet ©   (2011-06-17 21:46) [5]

> [2] Exterr   (17.06.11 21:03)
> Зная TMenuItem можно как-то узнать какому TPopupMenu он принадлежит?

Parent
и вверх, пока не TPopupMenu.


 
Юрий Зотов ©   (2011-06-17 22:28) [6]

GetParentMenu


 
Exterr   (2011-06-18 08:52) [7]

Большое спасибо!



Страницы: 1 вся ветка

Текущий архив: 2011.10.09;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.008 c
2-1308499032
Geo
2011-06-19 19:57
2011.10.09
Fast Report. Количество совпадений из таблицы


15-1308428998
Юрий
2011-06-19 00:29
2011.10.09
С днем рождения ! 19 июня 2011 воскресенье


2-1308799300
petvv
2011-06-23 07:21
2011.10.09
Закрытие формы при возникновении в ней исключения


9-1189763352
andreil
2007-09-14 13:49
2011.10.09
Глюк OpenGL


2-1308805463
Anoinimous1
2011-06-23 09:04
2011.10.09
Как создать трёхуровневый список в TreeView, Delphi?