anchor.diff:      tsEditor: TfpgTabSheet;
       tsShortcuts: TfpgTabSheet;
       Label1: TfpgLabel;
  -    edtFPCDir: TfpgDirectoryEdit;
  +    edtFPCSrcDir: TfpgDirectoryEdit;
       edtFPGuiDir: TfpgDirectoryEdit;
       edtFPGuiLibDir: TfpgDirectoryEdit;
       edtSyntaxDefDir: TfpgDirectoryEdit;
  
positive.code:   gINI.WriteString(cEnvironment, 'Target', edtTarget.Text);
    gINI.WriteString(cEditor, 'Font', edtEditorFont.FontDesc);
  
  
  end;
  
  
negative.code: 
  procedure TConfigureIDEForm.SaveSettings;
  begin
    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);
  