summaryrefslogtreecommitdiff
path: root/src/corelib
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-08-21 14:40:43 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-08-21 14:40:43 +0000
commit7d0c8c60a7ff5e6f0b25a99073ca034ef028d798 (patch)
treed3142ceb3be18d5b7ecb69a04cc41250f077ca9b /src/corelib
parent10bbbbb92387d85bff694007b73b3104710b0ad6 (diff)
downloadfpGUI-7d0c8c60a7ff5e6f0b25a99073ca034ef028d798.tar.xz
* minor fix
Diffstat (limited to 'src/corelib')
-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,