Это SubMenu?

[MadChild]

Всем доброго здравия и с праздником.
Собственно вопрос вот в чем, как определить, что пенк меню является подменю? Пунанно.
Возможно есть что-то типа IsSubMemu.
Вот что делаю:

Код: Выделить всё

    For i = 1 To Form1.Controls.Count - 1
            If TypeOf Form1.Controls(i) Is Menu Then
                      ' Вот тут нужно понять, подменю это или нет.
   
            end if
    next i


Ну и поняв это выкладиваю в TreeView. Это нужно для того, чтобы разным пользователям программы можно было разрешать или запрешать те или иные пункты меню.
Вот так.

[MadChild]

Не густо. Второй день в инете смотрю - пока ноль.

Еще один вопросик. Как можно скрыть пункт меню зная его имя.
Например у меня есть пункты: mInfo,miSave,miShow,miComplexDemandsPrint и т.д.
Их базы получаю список менюшек которые нужно скрыть: miShow, miSave.
Как мне используя имя объекта его скрыть?

[Antonariy]

Нажать F2 и посмотреть, что там имеется по поводу меню.