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

Qt: fixed crash of dangling qt pointer from viewportWidget mouse event.issue #26466

Browse Source 
git-svn-id: trunk@45820 -
This commit is contained in:
zeljko 2014-07-09 18:56:07 +00:00
parent 90b2efe9f2
commit 3190993c19
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/interfaces/qt/qtwidgets.pas
View File

@ -15911,9 +15911,12 @@ end;
procedure TQtAbstractScrollArea.SetNoMousePropagation(Sender: QWidgetH; procedure TQtAbstractScrollArea.SetNoMousePropagation(Sender: QWidgetH;
const ANoMousePropagation: Boolean); const ANoMousePropagation: Boolean);
begin begin
// keep it so because sender can be dangling pointer from qt inside
// mouse event of viewportWidget ! issue #26466
if Sender = viewportWidget then if Sender = viewportWidget then
inherited SetNoMousePropagation(Sender, False) inherited SetNoMousePropagation(Sender, False)
else else
if Sender = Widget then
inherited SetNoMousePropagation(Sender, ANoMousePropagation); inherited SetNoMousePropagation(Sender, ANoMousePropagation);
end; end;