SOLVED: Hhierarchical Context Menu, How to ??

 

I try to create a hierarchical context menu, with no luck, I defien one itme as popup and try to add to it's control items, but it always goes to the main context menu...

 

Is there any way to achieve that ..

 

Best regards,

 

 

I am afraid this is not possible, I took one of the examples SDISample, there is a script to create context menu, I try to add your line, but the intelisence didn't regonize ..

 

Take a look:

    Dim ContextBar As CommandBar
    Set ContextBar = CommandBars.ContextMenus.Add(400, "Context Menu")
    With ContextBar.Controls
        .Add xtpControlButton, ID_FILE_NEW, "&New"
        .Add xtpControlButton, ID_FILE_OPEN, "&Open"
        .Add xtpControlButton, ID_FILE_SAVE, "&Save"
       
        Set Control = .Add(xtpControlButton, ID_FILE_PRINT, "&Print")
        Control.BeginGroup = True
       
        Set Control = .Add(xtpControlButton, ID_EDIT_CUT, "Cu&t")
        Control.BeginGroup = True
        Control.Controls.Add xtpControlButton, 1212, "Hello"
       
        .Add xtpControlButton, ID_EDIT_COPY, "&Copy"
        .Add xtpControlButton, ID_EDIT_PASTE, "&Paste"
    End With

Logical should work ...

 

Can you provide a script to loop through all the active menu items if possible, this would be of great help to me ...

 

Best regards