diff options
| author | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2012-12-20 17:53:45 +0000 |
|---|---|---|
| committer | Graeme Geldenhuys <graeme@mastermaths.co.za> | 2012-12-20 17:53:45 +0000 |
| commit | e7e1c36ff33919d4f939ad8588537bfbe52a7ef4 (patch) | |
| tree | 334bbb5c552520e7e5f12a05285b6a69a4a2b07d | |
| parent | 44bb0f2fc10d44eb8913dc0da34ef869f6e4a96b (diff) | |
| download | fpGUI-e7e1c36ff33919d4f939ad8588537bfbe52a7ef4.tar.xz | |
Minor changes for AggPas-Canvas under X11.
| -rw-r--r-- | src/corelib/render/software/agg_platform_x11.inc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/corelib/render/software/agg_platform_x11.inc b/src/corelib/render/software/agg_platform_x11.inc index 5e595c3f..331b572e 100644 --- a/src/corelib/render/software/agg_platform_x11.inc +++ b/src/corelib/render/software/agg_platform_x11.inc @@ -25,7 +25,7 @@ type // to get access to protected methods (seeing that FPC doesn't support Friend-classes) - TX11ImageHack = class(TfpgImage); + TImageHack = class(TfpgImage); procedure TAgg2D.DoPutBufferToScreen(x, y, w, h: TfpgCoord); var @@ -34,7 +34,7 @@ var begin if TfpgWindow(FWindow).WinHandle <= 0 then begin - writeln(' no winhandle available'); + debugln(' no winhandle available'); exit; end; @@ -43,7 +43,7 @@ begin // finally dump the image to screen! XPutImage(fpgApplication.Display, TfpgWindow(FWindow).WinHandle, - drawgc, TX11ImageHack(FImg).XImage, 0, 0, 0, 0, + drawgc, TImageHack(FImg).XImage, 0, 0, 0, 0, FWindow.Width, FWindow.Height); XFreeGc(fpgApplication.Display, drawgc); |