1 files changed, 2 insertions, 2 deletions
diff --git a/src/gui/fpg_basegrid.pas b/src/gui/fpg_basegrid.pas
index ae6584b8..6f9de311 100644
--- a/src/gui/fpg_basegrid.pas
+++ b/src/gui/fpg_basegrid.pas
@@ -624,7 +624,7 @@ begin
     begin
       FHScrollBar.Max := cw - vw;
       FHScrollBar.Position := FXOffset;
-      FHScrollBar.SliderSize := TotalColumnWidth / Width;
+      FHScrollBar.SliderSize := Width / TotalColumnWidth;
     end
     else
     begin
@@ -1028,7 +1028,7 @@ begin
       FColResizing := False
     else
     begin
-      cw := ColumnWidth[FResizedCol]+x-FDragPos;
+      cw := (ColumnWidth[FResizedCol]+x)-FDragPos;
       if cw < 1 then
         cw := 1;
       SetColumnWidth(FResizedCol, cw);