Index: src/fcolumnssetconf.pas
===================================================================
--- src/fcolumnssetconf.pas	(revision 4680)
+++ src/fcolumnssetconf.pas	(working copy)
@@ -166,6 +166,7 @@
       var Editor: TWinControl);
 
     {Editors}
+    procedure SpinEditEnter(Sender: TObject);
     procedure SpinEditExit(Sender: TObject);
     procedure SpinEditChange(Sender: TObject);
     procedure EditExit(Sender: TObject);
@@ -331,7 +332,6 @@
              Top:=(Sender as TStringGrid).CellRect(aCol,aRow).Top;
              Height:=(Sender as TStringGrid).RowHeights[aRow];
              Width:=(Sender as TStringGrid).ColWidths[aCol];
-             Value:=StrToInt((Sender as TStringGrid).Cells[aCol,aRow]);
            end;
          Editor:=updWidth;
        end;
@@ -550,6 +550,7 @@
      OnKeyDown := @EditorKeyDown;
      OnChange := @SpinEditChange;
      OnExit := @SpinEditExit;
+     OnEnter := @SpinEditEnter;
   end;
 
 
@@ -657,6 +658,15 @@
   AddNewField;
 end;
 
+procedure TfColumnsSetConf.SpinEditEnter(Sender : TObject);
+Var
+  ARow, ACol : Integer;
+Begin
+  ACol := StrToIntDef((Sender as TSpinEdit).Hint, 0);
+  ARow := (Sender as TSpinEdit).Tag;
+  (Sender as TSpinEdit).Value :=  StrToIntDef(stgColumns.Cells[aCol,aRow], 0);
+end;
+
 procedure TfColumnsSetConf.SpinEditExit(Sender: TObject);
 begin
   EditorSaveResult(Sender);