Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "KOL";
Текущий архив: 2006.04.02;
Скачать: [xml.tar.bz2];

Вниз

Борюсь с подменю - заменить и удалить   Найти похожие ветки 

 
mixis   (2005-08-08 22:49) [0]

Задача: обновлять подменю MyMenu (:PMenu) посредством его (пере)создания, вставки и удаления.

Первый этап (пока всё работает нормально)
После вставки подменю MyMenu во вторую позицию PopupMenu1:
PopupMenu1.InsertSubMenu(MyMenu,1);
оно удаляется:
PopupMenu1.RemoveSubMenu(PopupMenu1.IndexOf(M));

Начинаются глюки
Имеем: свойство itemindex тех item"ов, которые были ниже, увеличилось
на некоторую величину (взависимости от того, сколько пунктов было в MyMenu)

Второй этап (глюков меньше не становиться)
теперь, если вставить (во второй раз) подменю MyMenu в эту же позицию:
PopupMenu1.InsertSubMenu(MyMenu,1);
оно появляется самой последней строкой, а второй элемент в меню "теряет" обработчик

Как победить в неравной борьбе?


 
thaddy   (2005-08-09 14:19) [1]

property MenuID does not change, the index does....
RTM, this has been here many times and is probably in the FAQ.
At least it is documented in the sourcecode under Tmenu.MenuID.


 
mixis   (2005-08-10 14:19) [2]

with MenuID understood
but after remove MyMeny (MyMenu: PMenu - SubMenu in PopupMenu1)
and again insert in 2 position - MyMenu so appear in last position
reason unclear :(((



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

Форум: "KOL";
Текущий архив: 2006.04.02;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.047 c
15-1142028685
fann
2006-03-11 01:11
2006.04.02
Дело такое, у меня есть программа, но она закомпилированна....


6-1135000546
bumm
2005-12-19 16:55
2006.04.02
Poluchit IP udalennogo compa


2-1142424719
HpeHoBuHa
2006-03-15 15:11
2006.04.02
MS Ёксель. Chart ы


10-1115984546
Chaser
2005-05-13 15:42
2006.04.02
Excel - формат ячейки


15-1142318332
iamdanil
2006-03-14 09:38
2006.04.02
Cкачать Delphi





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский