diff options
-rw-r--r-- | src/corelib/gdi/gfx_gdi.pas | 2 | ||||
-rw-r--r-- | src/corelib/x11/gfx_x11.pas | 2 |
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, |