anchor.diff:  
   
   const
  +  cTitle = 'fpGUI IDE - %s';
     cFileFilterTemplate  = '%s (%s)|%s';
     cSourceFiles = '*.pas;*.pp;*.lpr';
     cProjectFiles = '*.project';
  
positive.code:     procedure   CloseAllTabs;
      procedure   OpenEditorPage(const AFilename: TfpgString);
      procedure   miTest(Sender: TObject);
    public
      constructor Create(AOwner: TComponent); override;
      procedure   AfterCreate; override;
  
negative.code:         TfpgMessageDialog.Critical('', E.Message);
        end;
      end;
      UpdateWindowTitle;
      AddMessage(Format('Project saved as <%s>.', [s]));
    end;
  end;
  