anchor.diff:  begin
     frm := TConfigureIDEForm.Create(nil);
     try
  +    frm.LoadSettings;
       Result := frm.ShowModal = mrOK;
       if Result then
       begin
  -      // save settings to INI file
  +      frm.SaveSettings;
       end;
     finally
       frm.Free;
  
positive.code:   with edtCompiler do
    begin
      Name := 'edtCompiler';
      SetPosition(8, 266, 348, 24);
      ExtraHint := '';
      FileName := '/opt/fpc_2.4.1/${TARGET}/bin/fpc';
      InitialDir := '';
  
negative.code: end;
  
  {@VFD_NEWFORM_IMPL}
  
  procedure TConfigureIDEForm.LoadSettings;
  begin
    edtFPCDir.Directory := gINI.ReadString(cEnvironment, 'fpcDir', '');
    edtFPGuiDir.Directory := gINI.ReadString(cEnvironment, 'fpGuiDir', '');
    edtFPGuiLibDir.Directory := gINI.ReadString(cEnvironment, 'fpGuiLibDir', '${FPGUIDIR}lib/');
    edtSyntaxDefDir.Directory := gINI.ReadString(cEnvironment, 'SyntaxDefDir', '${FPGUIDIR}apps/ide/syntaxdefs/');
    edtTempateDir.Directory := gINI.ReadString(cEnvironment, 'TemplateDir', '${FPGUIDIR}apps/ide/templates/');
    edtCompiler.Filename := gINI.ReadString(cEnvironment, 'Compiler', '');
    edtDebugger.Filename := gINI.ReadString(cEnvironment, 'Debugger', 'gdb');
    edtExeExt.Text := gINI.ReadString(cEnvironment, 'ExeExt', '');
    edtTarget.Text := gINI.ReadString(cEnvironment, 'Target', 'i386-linux');
  end;
  
  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, 'SyntaxDefDir', edtSyntaxDefDir.Directory);
    gINI.WriteString(cEnvironment, 'TemplateDir', edtTempateDir.Directory);
    gINI.WriteString(cEnvironment, 'Compiler', edtCompiler.Filename);
    gINI.WriteString(cEnvironment, 'Debugger', edtDebugger.Filename);
    gINI.WriteString(cEnvironment, 'ExeExt', edtExeExt.Text);
    gINI.WriteString(cEnvironment, 'Target', edtTarget.Text);
  end;
  
  procedure TConfigureIDEForm.AfterCreate;
  begin
    {%region 'Auto-generated GUI code' -fold}
    {@VFD_BODY_BEGIN: ConfigureIDEForm}
    Name := 'ConfigureIDEForm';
    SetPosition(332, 190, 578, 480);
    WindowTitle := 'Configure IDE';
    Hint := '';
    WindowPosition := wpOneThirdDown;
  