paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-11 16:19:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

wince interface: fixed lock in AppProcessMessages from Rozbeh

Browse Source 
git-svn-id: trunk@10615 -
This commit is contained in:
vincents 2007-02-09 13:32:12 +00:00
parent ff7a9a5c84
commit 29fb86d1b8
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/wince/winceobject.inc
View File

@ -319,6 +319,10 @@ Begin
DispatchMessage(@AMessage);
end;
end;
if FWaitHandleCount = 0 then
break;
end
else
if retVal = WAIT_TIMEOUT then