mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-19 19:20:42 +02:00
IDE: More ProcessMessages during compilation, better responsiveness
git-svn-id: trunk@24386 -
This commit is contained in:
parent
64714af5b6
commit
a47f917688
@ -297,7 +297,7 @@ begin
|
||||
|
||||
LastProcessMessages:=Now-1;// force one update at start
|
||||
repeat
|
||||
if (Application<>nil) and (abs(LastProcessMessages-Now)>((1/86400)/3))
|
||||
if (Application<>nil) and (abs(LastProcessMessages-Now)>((1/86400)/15))
|
||||
then begin
|
||||
LastProcessMessages:=Now;
|
||||
if EndUpdateNeeded then begin
|
||||
|
Loading…
Reference in New Issue
Block a user