anchor.diff:    begin
       Name := 'mnuTools';
       SetPosition(476, 182, 172, 20);
  -    AddMenuItem('fpGUI UI Designer...', '', nil);
  -    AddMenuItem('fpGUI DocView...', '', nil);
  +    AddMenuItem('fpGUI UI Designer...', 'F12', nil);
  +    AddMenuItem('fpGUI DocView...', 'Ctrl+F1', nil);
     end;
   
     mnuSettings := TfpgPopupMenu.Create(self);
  
positive.code:   begin
      Name := 'mnuFile';
      SetPosition(476, 61, 172, 20);
      AddMenuItem('New...', '', nil).Enabled := False;
      AddMenuItem('Open...', '', nil).Enabled := False;
      AddMenuItem('Open Recent', '', nil).Enabled := False;
      AddMenuItem('Save', '', @miFileSave);
      AddMenuItem('Save As...', '', @miFileSaveAs);
      AddMenuItem('-', '', nil);
      AddMenuItem('Quit', '', @btnQuitClicked);
    end;
  
    mnuEdit := TfpgPopupMenu.Create(self);
  
negative.code:     AddMenuItem('Make 4', 'Ctrl+Alt+4', @miRunMake4);
      AddMenuItem('-', '', nil);
      AddMenuItem('Run', 'F9', nil);
      AddMenuItem('Run Parameters...', 'Shift+F9', nil);
    end;
  
    mnuTools := TfpgPopupMenu.Create(self);
  