summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/corelib/gdi/gfx_gdi.pas2
-rw-r--r--src/corelib/x11/gfx_x11.pas2
2 files changed, 2 insertions, 2 deletions
diff --git a/src/corelib/gdi/gfx_gdi.pas b/src/corelib/gdi/gfx_gdi.pas
index f6a2dbb3..1b8d82c0 100644
--- a/src/corelib/gdi/gfx_gdi.pas
+++ b/src/corelib/gdi/gfx_gdi.pas
@@ -1008,7 +1008,7 @@ end;
function TfpgWindowImpl.DoWindowToScreen(ASource: TfpgWindowBase; const AScreenPos: TPoint): TPoint;
begin
- if not ASource.HandleIsValid then
+ if not TfpgWindowImpl(ASource).HandleIsValid then
Exit; //==>
Result.X := AScreenPos.X;
diff --git a/src/corelib/x11/gfx_x11.pas b/src/corelib/x11/gfx_x11.pas
index 1ed0af85..63cce392 100644
--- a/src/corelib/x11/gfx_x11.pas
+++ b/src/corelib/x11/gfx_x11.pas
@@ -1121,7 +1121,7 @@ var
dy: integer;
cw: TfpgWinHandle;
begin
- if not ASource.HandleIsValid then
+ if not TfpgWindowImpl(ASource).HandleIsValid then
Exit; //==>
XTranslateCoordinates(xapplication.display, TfpgWindowImpl(ASource).WinHandle,