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

qt: simplify TQtWidget.GetWidget

Browse Source 
git-svn-id: trunk@38889 -
This commit is contained in:
blikblum 2012-09-29 01:38:07 +00:00
parent 5380fecc6f
commit 4443b9ae3f
1 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/qt/qtwidgets.pas
View File

@ -5039,10 +5039,7 @@ end;
function TQtWidget.GetWidget: QWidgetH;
begin
if TheObject <> nil then
Result := QWidgetH(TheObject)
else
Result := nil;
Result := QWidgetH(TheObject);
end;
function TQtWidget.DeliverMessage(var Msg;