The menu palette text for each menu is adopted last so that it appears after the previous menu item.

The following code instantiates the palette window and adopts the palette window to the window group.

      theMainMenu.AdoptLast (TMarsPresenter::gToolSubMenuItem);
      theMainMenu.AdoptLast (TMarsPresenter::gColorSubMenuItem);
      theMainMenu.AdoptLast (TMarsPresenter::gPenSubMenuItem);
      theMainMenu.AdoptLast (TMarsPresenter::gTextSubMenuItem);