cocoa: assigning value to updown control, when changed by ws. #34663

git-svn-id: trunk@60968 -

lcl/interfaces/cocoa/cocoawscomctrls.pas

@@ -302,6 +302,7 @@ procedure TUpdownCommonCallback.UpdownClick(isUpPressed: Boolean);
 const
   UpDownBtn : array [Boolean] of TUDBtnType = (btPrev, btNext);
 begin
+  TAccessUpDown(Target).Position := NSStepper(Owner).intValue;
   if Assigned( TAccessUpDown(Target).OnClick ) then
     TAccessUpDown(Target).OnClick( Target, UpDownBtn[isUpPressed]);
 end;