diff --git a/lcl/interfaces/cocoa/cocoatextedits.pas b/lcl/interfaces/cocoa/cocoatextedits.pas
index 581ea15ee7..4773a8be92 100644
--- a/lcl/interfaces/cocoa/cocoatextedits.pas
+++ b/lcl/interfaces/cocoa/cocoatextedits.pas
@@ -2049,6 +2049,7 @@ begin
   begin
     updateStepper;
     StepperChanged(nil); // and refresh self
+    anyChange := false;
   end;
   inherited textDidEndEditing(notification);
 end;