anchor.diff:  procedure TfrmVFDSetup.SaveSettings;
   begin
     gINI.WriteInteger('Designer', 'Version', cDesignerINIVersion);
  -  gINI.WriteInteger('Options', 'GridResolution', StrToInt(chlGrid.Text));
  +  gINI.WriteInteger('Options', 'GridResolution', edtGridX.Value);
     gINI.WriteInteger('Options', 'MRUFileCount', tbMRUFileCount.Position);
     gINI.WriteBool('Options', 'ShowFullPath', chkFullPath.Checked);
     gINI.WriteString('Options', 'DefaultFileExt', edtDefaultExt.Text);
  
positive.code: procedure TfrmVFDSetup.LoadSettings;
  begin
    FINIVersion             := gINI.ReadInteger('Designer', 'Version', 0);
    chlGrid.FocusItem       := gINI.ReadInteger('Options', 'GridResolution', 4)+1;
    tbMRUFileCount.Position := gINI.ReadInteger('Options', 'MRUFileCount', 4);
    chkFullPath.Checked     := gINI.ReadBool('Options', 'ShowFullPath', True);
    edtDefaultExt.Text      := gINI.ReadString('Options', 'DefaultFileExt', '.pas');
  
negative.code:     Text := 'Grid resolution:';
    end;
  
    btnOK := TfpgButton.Create(self);
    with btnOK do
    begin
  