paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-07 22:16:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

cocoa: calling updateWindows on every event sent. Removing the hacking property assignment.

Browse Source 
git-svn-id: trunk@62707 -
This commit is contained in:
dmitry 2020-03-08 04:59:00 +00:00
parent c4afc0803c
commit 64e40526df
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/cocoa/cocoaint.pas
View File

@ -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}