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

Вниз

Опять про TreeView и TMenuItem   Найти похожие ветки 

 
V.exeR   (2002-06-05 01:56) [0]

Я уже пытался задать этот вопрос, но ничего конкретного никто не ответил. Итак, есть объект типа TTreeView, который читается из текстового файла. Необходимо создать popup-menu по образу и подобию данного TTreeView, примерно как кнопка "Пуск". Я реализую это примерно так:
var Menuz:Array[0..200] Of TMenuItem
...
Begin
...
For i:=0 to 200 Do Menuz[i]:=TMenuItem.Create;
...

Ну и рекурсивно проходя по TreeView, формирую их иерархию. А если не объявлять массив на 201 элемент, а создавать MenuItem"ы как-нить динамически, чтоб при создании элемента TTreeNode создавался элемент TMenuItem? (не слишком запутанно? :)
Подскажите, plz!
Если кто знает готовую компоненту, тем более буду благодарен.


 
Bsl   (2002-06-05 07:52) [1]

Ну, обрабатывай события в TTreeView и, в ответ на них динамически формируй менюшку! Только ты замучаешься, потому, что надо будет отслеживать создания, удаления и перемещения пунктов, кроме того, все зависит от твоей проги.
Второй вариант: создай новый класс на основе TTreeView и перекрой все функции модификации дерева (с вызовов inherited;) - теперь у тебя все будет отлеживаться.



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

Форум: "Основная";
Текущий архив: 2002.06.17;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.123 c
6-55250
Romanew
2002-04-09 12:53
2002.06.17
Как из программы открыть Explorer с заданным файлом


4-55378
Rammst
2002-04-13 09:03
2002.06.17
Свободное место на винчестере


1-55098
Korona
2002-06-03 22:42
2002.06.17
Вопрос по MDI


1-55198
PTE
2002-06-04 17:59
2002.06.17
QReport, проблемы с выводом данных


1-55102
Alexis2k
2002-06-06 10:26
2002.06.17
Как встроить VCL компонент в PopUpMenu?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский