Qt, Qt5: process all events. issue #31372

git-svn-id: trunk@54136 -
This commit is contained in:
zeljko 2017-02-10 17:03:38 +00:00
parent 12b82fa209
commit 4064104009
2 changed files with 4 additions and 3 deletions

View File

@ -594,7 +594,7 @@ begin
if Assigned(Application) and not Application.Terminated then
begin
if AWinControl.HandleObjectShouldBeVisible or (fsModal in TCustomForm(AWinControl).FormState) then
QCoreApplication_processEvents(QEventLoopExcludeUserInputEvents);
QCoreApplication_processEvents(QEventLoopAllEvents);
end;
if (Application.TaskBarBehavior = tbSingleButton) or

View File

@ -583,8 +583,9 @@ begin
Widget.EndUpdate;
{$IFDEF HASX11}
if AWinControl.HandleObjectShouldBeVisible then
QCoreApplication_processEvents(QEventLoopExcludeUserInputEvents);
if AWinControl.HandleObjectShouldBeVisible or
(fsModal in TCustomForm(AWinControl).FormState) then
QCoreApplication_processEvents(QEventLoopAllEvents);
if (Application.TaskBarBehavior = tbSingleButton) or
(TForm(AWinControl).ShowInTaskBar <> stDefault) then