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

Qt: use IsValidHandle() to check handle in ClientToScreen() and ScreenToClient()

Browse Source 
git-svn-id: trunk@31588 -
This commit is contained in:
zeljko 2011-07-07 13:35:18 +00:00
parent fd126a05a7
commit 156bee63ed
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/qt/qtwinapi.inc
View File

@ -156,7 +156,7 @@ var
APoint: TQtPoint;
Pt: TPoint;
begin
Result := Handle <> 0;
Result := IsValidHandle(Handle);
if Result then
begin
APoint := QtPoint(P.X, P.Y);
@ -4895,7 +4895,7 @@ var
APoint: TQtPoint;
begin
Result := 0;
if Handle <> 0 then
if IsValidHandle(Handle) then
begin
APoint := QtPoint(P.X, P.Y);
QWidget_mapFromGlobal(TQtWidget(Handle).GetContainerWidget, @APoint, @APoint);