From 7d0c8c60a7ff5e6f0b25a99073ca034ef028d798 Mon Sep 17 00:00:00 2001 From: graemeg Date: Tue, 21 Aug 2007 14:40:43 +0000 Subject: * minor fix --- src/corelib/gdi/gfx_gdi.pas | 2 +- src/corelib/x11/gfx_x11.pas | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'src/corelib') 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, -- cgit v1.2.3-70-g09d2