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

LCL: call WakeMainThread() in QueueAsyncCall, so messages are passed.Patch by Henry Vermaak. issues #13120,#18599

Browse Source 
git-svn-id: trunk@30403 -
This commit is contained in:
zeljko 2011-04-20 15:43:27 +00:00
parent 8c68272871
commit 25505a1b46
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/include/application.inc
View File

@ -2178,6 +2178,9 @@ begin
end; end;
Last := lItem; Last := lItem;
end; end;
if Assigned(WakeMainThread) then
WakeMainThread(nil);
end; end;
procedure TApplication.RemoveAsyncCalls(const AnObject: TObject); procedure TApplication.RemoveAsyncCalls(const AnObject: TObject);