mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-23 22:59:21 +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
|
LastProcessMessages:=Now-1;// force one update at start
|
||||||
repeat
|
repeat
|
||||||
if (Application<>nil) and (abs(LastProcessMessages-Now)>((1/86400)/3))
|
if (Application<>nil) and (abs(LastProcessMessages-Now)>((1/86400)/15))
|
||||||
then begin
|
then begin
|
||||||
LastProcessMessages:=Now;
|
LastProcessMessages:=Now;
|
||||||
if EndUpdateNeeded then begin
|
if EndUpdateNeeded then begin
|
||||||
|
Loading…
Reference in New Issue
Block a user