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

Qt: Fixed TQtWidget.setCursor() crash under MacOsX

Browse Source 
git-svn-id: trunk@14990 -
This commit is contained in:
zeljko 2008-04-27 12:09:28 +00:00
parent 8e27baa639
commit 0e6090e646
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/qt/qtwidgets.pas
View File

@ -2366,6 +2366,10 @@ end;
procedure TQtWidget.SetCursor(const ACursor: QCursorH); procedure TQtWidget.SetCursor(const ACursor: QCursorH);
begin begin
{$IFDEF DARWIN}
if not QWidget_isVisible(Widget) then
exit;
{$ENDIF}
if ACursor <> nil then if ACursor <> nil then
QWidget_setCursor(Widget, ACursor) QWidget_setCursor(Widget, ACursor)
else else