From 64e40526df41fb8dabd96e56636a4803243da2ff Mon Sep 17 00:00:00 2001 From: dmitry Date: Sun, 8 Mar 2020 04:59:00 +0000 Subject: [PATCH] cocoa: calling updateWindows on every event sent. Removing the hacking property assignment. git-svn-id: trunk@62707 - --- lcl/interfaces/cocoa/cocoaint.pas | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lcl/interfaces/cocoa/cocoaint.pas b/lcl/interfaces/cocoa/cocoaint.pas index 28ec163c64..cc0b468707 100644 --- a/lcl/interfaces/cocoa/cocoaint.pas +++ b/lcl/interfaces/cocoa/cocoaint.pas @@ -445,7 +445,6 @@ end; {$ifdef COCOALOOPOVERRIDE} procedure TCocoaApplication.run; begin - setValue_forKey(NSNumber.numberWithBool(true), NSSTR('_running')); aloop(); end; {$endif} @@ -550,6 +549,9 @@ begin inherited sendEvent(theEvent); if (theEvent.type_ = NSMouseMoved) then ForwardMouseMove(Self, theEvent); + + // todo: this should be called for "Default" or "Modal" loops + NSApp.updateWindows; finally // Focus change notification used to be in makeFirstResponder method @@ -668,7 +670,6 @@ begin end; {$else} CheckSynchronize; - NSApp.updateWindows; if Assigned(Application) then TCrackerApplication(Application).ProcessAsyncCallQueue; {$endif}