anchor.diff:  
   procedure TConfigureIDEForm.SaveSettings;
   begin
  -  gINI.WriteString(cEnvironment, 'fpcDir', edtFPCDir.Directory);
  -  gINI.WriteString(cEnvironment, 'fpGuiDir', edtFPGuiDir.Directory);
  -  gINI.WriteString(cEnvironment, 'fpGuiLibDir', edtFPGuiLibDir.Directory);
  +  gINI.WriteString(cEnvironment, 'FPCSrcDir', edtFPCSrcDir.Directory);
  +  gINI.WriteString(cEnvironment, 'FPGuiDir', edtFPGuiDir.Directory);
  +  gINI.WriteString(cEnvironment, 'FPGuiLibDir', edtFPGuiLibDir.Directory);
     gINI.WriteString(cEnvironment, 'SyntaxDefDir', edtSyntaxDefDir.Directory);
     gINI.WriteString(cEnvironment, 'TemplateDir', edtTempateDir.Directory);
     gINI.WriteString(cEnvironment, 'Compiler', edtCompiler.Filename);
  
positive.code:     tsEditor: TfpgTabSheet;
      tsShortcuts: TfpgTabSheet;
      Label1: TfpgLabel;
      edtFPCDir: TfpgDirectoryEdit;
      edtFPGuiDir: TfpgDirectoryEdit;
      edtFPGuiLibDir: TfpgDirectoryEdit;
      edtSyntaxDefDir: TfpgDirectoryEdit;
  
negative.code:   gINI.WriteString(cEnvironment, 'Target', edtTarget.Text);
    gINI.WriteString(cEditor, 'Font', edtEditorFont.FontDesc);
  
    SaveToMacroList(GMacroList);
  end;
  
  end;
  
  