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

Вниз

PopupMenu   Найти похожие ветки 

 
Remis   (2003-05-22 23:39) [0]

Как программно добавить submenu?


 
KA_ ©   (2003-05-23 08:59) [1]


var
PopupItem: TMenuItem;
begin
...
PopupItem := TMenuItem.Create(Self);
PopupItem.Caption := "Caption of new item";
PopupItem.OnClick := NewPopupItemClick;
PopupMenu.Items.Add(PopupItem);
...
end;


 
Palladin ©   (2003-05-23 09:07) [2]

что бы из пункта получилось меню нужно добавить в этот пункт пункт :)


 
Remis   (2003-05-23 12:02) [3]

Создать Menu.Items я умею... Но мне надо в один пункт добавить другие пункты. И незнаю как. Вот как в примере в "Caption of new item" нужно добавить еще скажем item1, item2, item3...


 
Palladin ©   (2003-05-23 12:04) [4]

метод Add вам знаком?


 
Remis   (2003-05-23 12:44) [5]

Конечно знаком. Но видимо я плохо обьясняю или незнаю чего то элементарного...
Если я делаю PopupMenu.Items.Add(PopupItem), добавляеться пункт в menu, если еще раз PopupMenu.Items.Add(PopupItem), добавляеться пункт РЯДОМ с первым. А мне нужно добавить В первый пункт...


 
Palladin ©   (2003-05-23 12:54) [6]

а вот так не пробовал
PopupMenu.Items[1].Add(PopupItem)


 
Remis   (2003-05-23 21:24) [7]

Во... Это то что нужно. :))



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

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

Наверх




Память: 0.47 MB
Время: 0.02 c
6-13349
Somofly
2003-04-05 03:06
2003.06.05
TWebBrowser


1-13316
Rulya
2003-05-21 21:21
2003.06.05
Создание цифрового Вольтметра


7-13486
ws
2003-04-03 16:19
2003.06.05
Как программно отличить виртуальный CDROM от реального?


8-13338
Saracin
2003-02-20 18:51
2003.06.05
Как перевести рисунок из TCanvas в TBitmap ?


1-13250
Vick
2003-05-15 15:07
2003.06.05
Программно из Делфи объединять ячейки в Excel