anchor.diff:      miBookmarks: TfpgPopupMenu;
       miView: TfpgPopupMenu;
       miHelp: TfpgPopupMenu;
  -    miDebug: TfpgPopupMenu;
       ToolBar: TfpgBevel;
       btnOpen: TfpgButton;
       btnBack: TfpgButton;
  
positive.code:   begin
      Name := 'miTools';
      SetPosition(428, 96, 120, 20);
      AddMenuItem('View source of RichView component', '', @ViewSourceMIOnClick);
    end;
  
  
negative.code:     AddMenuItem('Help using DocView', '', @miHelpUsingDocView);
      AddMenuItem('Command line parameters', '', @miHelpCmdLineParams);
      AddMenuItem('-', '', nil);
      AddMenuItem('About fpGUI Toolkit...', '', @miHelpAboutFPGui);
      AddMenuItem('Product Information...', '', @miHelpProdInfoClicked);
    end;
  
    ToolBar := TfpgBevel.Create(self);
  