RE: TMainMenu/TMenuItem bug?

[mharris <mhar.mneer@mcione.com>]

to add to the existing menu change your code as such.
will add bogus to bottom of file menu
(have not looked at other)

// Instead, the menu appears as a top-level menu!
void __fastcall TForm1::btnAddFileSubMenuClick(TObject *Sender)
{
   TMenuItem* MI = new TMenuItem(MainMenu1);
   MI->Caption = "Bogus File";
   MainMenu1->Items->Items[0]->Add(MI);

}


Thanks 
...Mike