[Gambas-user] Adding menu item in code > no caption visible

[richard terry]

I've overiddden the menu on the tabstip and want to dynamically add menu items 
as sub items in the menu to an existing menu called menu_EditorTab_AddNotes:

This sub  stops the original tab strip menu from popping up, it does work as 
the print statement shows up on the console,I enclose a png of what it looks 
like on the screen.

However, no text shows up in the caption.

PUBLIC SUB Editor_tabstrip_Menu()
   DIM hmenu AS Menu
  STOP EVENT
  PRINT "this worked"
   Editor_TapStip_CreateMenuChild("Hi There")
   menu_EditorTab.popup
  
END
PUBLIC SUB Editor_TapStip_CreateMenuChild(newmenuname AS String)
   DIM hmenu AS Menu
   hmenu = NEW Menu(menu_EditorTab_AddNotes, TRUE)
   hmenu.Caption = newmenuname
 END

An help appreciated.

Richard
-------------- next part --------------
A non-text attachment was scrubbed...
Name: no_caption_menu.png
Type: image/png
Size: 26596 bytes
Desc: not available
URL: <http://lists.gambas-basic.org/pipermail/user/attachments/20080321/12facb4c/attachment.png>