Index: lcl/interfaces/gtk2/gtk2callback.inc
===================================================================
--- lcl/interfaces/gtk2/gtk2callback.inc	(revision 48844)
+++ lcl/interfaces/gtk2/gtk2callback.inc	(working copy)
@@ -554,7 +554,7 @@
       // gtk2 have different meaning how validator should work and trigger
       // so we change it. #18679
       // do not use while loop, but assign to minimum or maximum allowed. #23190
-      if (AValue < AMin) or (AValue > AMax) then
+      if (AValue < AMin) or (AValue > AMax) and not (PGtkWidget(GetFocus)=widget) then
       begin
         if AValue < AMin then
           SValue := FloatToStr(AMin);
@@ -571,7 +571,7 @@
           inc(NumDigits);
         end;
       end;
-      if SNewValue <> SValue then
+      if (SNewValue <> SValue) then
         gtk_entry_set_text(PGtkEntry(Widget), PChar(SValue));
 
       // inform LCL about our changes to entry

Index: lcl/interfaces/gtk2/gtk2wsspin.pp
===================================================================
--- lcl/interfaces/gtk2/gtk2wsspin.pp	(revision 49420)
+++ lcl/interfaces/gtk2/gtk2wsspin.pp	(working copy)
@@ -100,17 +100,6 @@
     Exit(0);
 
   Result := gtk_spin_button_get_value({%H-}PGtkSpinButton(ACustomFloatSpinEdit.Handle));
-
-  // gtk2 have different meaning of value vs text in GtkSpinBox when
-  // we are dealing with real FloatSpinEdit. #18679.
-  // We need this because of validator in gtk2callback.inc -> gtkchanged_spinbox()
-  if ACustomFloatSpinEdit.DecimalPlaces > 0  then
-  begin
-    S := StrPas(gtk_entry_get_text({%H-}PGtkEntry(ACustomFloatSpinEdit.Handle)));
-    FL := 0;
-    if TryStrToFloat(S, FL) then
-      Result := FL;
-  end;
 end;
 
 class procedure TGtk2WSCustomFloatSpinEdit.SetSelStart(const ACustomEdit: TCustomEdit;
Index: lcl/interfaces/gtk2/gtk2callback.inc
===================================================================
--- lcl/interfaces/gtk2/gtk2callback.inc	(revision 49420)
+++ lcl/interfaces/gtk2/gtk2callback.inc	(working copy)
@@ -554,6 +554,7 @@
       // gtk2 have different meaning how validator should work and trigger
       // so we change it. #18679
       // do not use while loop, but assign to minimum or maximum allowed. #23190
+      (*
       if (AValue < AMin) or (AValue > AMax) then
       begin
         if AValue < AMin then
@@ -562,6 +563,7 @@
           SValue := FloatToStr(AMax);
         AValue := StrToFloatDef(SValue, 0);
       end;
+      *)
       if (Pos(ADecimalSeparator, SValue) > 0) and (length(SValue) > 1) then
       begin
         SNewValue := Copy(SValue,Pos(ADecimalSeparator, SValue) + 1, length(SValue));
@@ -579,8 +581,11 @@
       Mess.Msg := CM_TEXTCHANGED;
       DeliverMessage(Data, Mess);
     end else
-      // always signal update to pure TSpinEdit
-      gtk_spin_button_update(PGtkSpinButton(Widget));
+    begin
+      FillByte(Mess{%H-},SizeOf(Mess),0);
+      Mess.Msg := CM_TEXTCHANGED;
+      DeliverMessage(Data, Mess);
+    end;
   end;
 end;