mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-09 18:08:35 +02:00
LCL: comment
git-svn-id: trunk@31147 -
This commit is contained in:
parent
58083e5537
commit
016031a066
@ -1048,6 +1048,7 @@ begin
|
||||
// this can create new items, which are added to the 'Next' queue
|
||||
// or it can call ProcessAsyncCallQueue, for example via calling
|
||||
// Application.ProcesssMessages
|
||||
// Using a second queue avoids an endless loop, when an event adds a new event.
|
||||
repeat
|
||||
// remove top item from queue
|
||||
System.EnterCriticalSection(CritSec);
|
||||
|
Loading…
Reference in New Issue
Block a user