diff options
| author | Graeme Geldenhuys <graemeg@gmail.com> | 2014-10-19 20:22:13 +0100 |
|---|---|---|
| committer | Graeme Geldenhuys <graemeg@gmail.com> | 2014-10-19 20:22:13 +0100 |
| commit | 3778ccae5b383b45c08f51f435b45714a2d1d363 (patch) | |
| tree | 819d0774f077075598b6569e3ed55e0b586d2339 /src/corelib/gdi | |
| parent | e9d974dc967c8bb83c2cbc77d776106a782ab3b2 (diff) | |
| download | fpGUI-3778ccae5b383b45c08f51f435b45714a2d1d363.tar.xz | |
New fpgApplication.GetScreenPixelColor() for X11
We can now color pick a value on a X11 desktop.
Diffstat (limited to 'src/corelib/gdi')
| -rw-r--r-- | src/corelib/gdi/fpg_gdi.pas | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/corelib/gdi/fpg_gdi.pas b/src/corelib/gdi/fpg_gdi.pas index 1d5b7dff..8b7b9939 100644 --- a/src/corelib/gdi/fpg_gdi.pas +++ b/src/corelib/gdi/fpg_gdi.pas @@ -246,6 +246,7 @@ type procedure DoFlush; function GetScreenWidth: TfpgCoord; override; function GetScreenHeight: TfpgCoord; override; + function GetScreenPixelColor(APos: TPoint): TfpgColor; override; function Screen_dpi_x: integer; override; function Screen_dpi_y: integer; override; function Screen_dpi: integer; override; @@ -1416,6 +1417,11 @@ begin // Result := Windows.GetSystemMetrics(SM_CYSCREEN); end; +function TfpgGDIApplication.GetScreenPixelColor(APos: TPoint): TfpgColor; +begin + raise EfpGUIException.Create('Not implemented yet'); +end; + function TfpgGDIApplication.Screen_dpi_x: integer; begin Result := GetDeviceCaps(wapplication.display, LOGPIXELSX) |