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

Qt: fix for various crashes 32/64bit.We don't use eventprocessing on timers anymore,

Browse Source 
also there's a small fix to appWaitMessage().Tnx to Terry Kemp for issue investigation on 64bit.

git-svn-id: trunk@16264 -
This commit is contained in:
zeljko 2008-08-27 07:05:14 +00:00
parent 5b40ff0d6c
commit e09c9c8450
2 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/qt/qtobject.inc
View File

@ -166,7 +166,7 @@ begin
since it produces AV's sometimes, so better check is there
any pending event.}
if not QCoreApplication_hasPendingEvents then
QCoreApplication_processEvents(QEventLoopWaitForMoreEvents or QEventLoopDeferredDeletion);
QCoreApplication_processEvents(QEventLoopWaitForMoreEvents);
end;
{------------------------------------------------------------------------------

2
lcl/interfaces/qt/qtobjects.pas
View File

@ -3224,7 +3224,6 @@ end;
------------------------------------------------------------------------------}
function TQtTimer.EventFilter(Sender: QObjectH; Event: QEventH): Boolean; cdecl;
begin
BeginEventProcessing;
Result := False;
if QEvent_type(Event) = QEventTimer then
@ -3236,7 +3235,6 @@ begin
if Assigned(FCallbackFunc) then
FCallbackFunc;
end;
EndEventProcessing;
end;
{ TQtIcon }