diff --git a/lcl/dbgrids.pas b/lcl/dbgrids.pas
index c3c2dd156a..2ef53315c6 100644
--- a/lcl/dbgrids.pas
+++ b/lcl/dbgrids.pas
@@ -872,7 +872,7 @@ var
 begin
   if Avalue<>SelectedField then begin
     i := GetGridColumnFromField( AValue );
-    if i>FirstGridColumn then
+    if i>=FirstGridColumn then
       Col := i;
   end;
 end;