anchor.diff:      procedure   miFileSaveAs(Sender: TObject);
       procedure   miAboutFPGuiClicked(Sender: TObject);
       procedure   miAboutIDE(Sender: TObject);
  +    procedure   miRunMake(Sender: TObject);
       procedure   miConfigureIDE(Sender: TObject);
       procedure   miViewDebug(Sender: TObject);
       procedure   TabSheetClosing(Sender: TObject; ATabSheet: TfpgTabSheet);
       procedure   UpdateStatus(const AText: TfpgString);
       procedure   SetupProjectTree;
       procedure   SetupFilesGrid;
  +    procedure   AddMessage(const AMsg: TfpgString);
     public
       constructor Create(AOwner: TComponent); override;
       procedure   AfterCreate; override;
  
positive.code: procedure TMainForm.miAboutIDE(Sender: TObject);
  begin
    TfpgMessageDialog.Information('About fpGUI IDE', 'Created by Graeme Geldenhuys');
  end;
  
  procedure TMainForm.miConfigureIDE(Sender: TObject);
  
negative.code:       TfpgMemo(ts.Components[0]).Lines.EndUpdate;
      end;
      UpdateStatus(s);
      n := tvProject.RootNode.FindSubNode('Units', True);
      if Assigned(n) then
      begin
        n := n.AppendText(f);
        n.Data := ts;
        tvProject.Selection := n;
      end;
    end;
  