summaryrefslogtreecommitdiff
path: root/src/corelib/gdi/gfx_gdi.pas
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-03-18 11:30:11 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2008-03-18 11:30:11 +0000
commit4c3e00c708a81f1c9dcf055c949aa4c073424298 (patch)
treeddc4dc9c22c620608d784cc5a37cc012041324de /src/corelib/gdi/gfx_gdi.pas
parent96db2b4c9e32dd427b5df6dfa9f79d536643d493 (diff)
downloadfpGUI-4c3e00c708a81f1c9dcf055c949aa4c073424298.tar.xz
* Fully implemented DPI functions for GDI backend.
Diffstat (limited to 'src/corelib/gdi/gfx_gdi.pas')
-rw-r--r--src/corelib/gdi/gfx_gdi.pas6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/corelib/gdi/gfx_gdi.pas b/src/corelib/gdi/gfx_gdi.pas
index 66090c92..01bf1ded 100644
--- a/src/corelib/gdi/gfx_gdi.pas
+++ b/src/corelib/gdi/gfx_gdi.pas
@@ -1017,17 +1017,17 @@ end;
function TfpgApplicationImpl.Screen_dpi_x: integer;
begin
- Result := 96;
+ Result := GetDeviceCaps(wapplication.display, LOGPIXELSX)
end;
function TfpgApplicationImpl.Screen_dpi_y: integer;
begin
- Result := 96;
+ Result := GetDeviceCaps(wapplication.display, LOGPIXELSY)
end;
function TfpgApplicationImpl.Screen_dpi: integer;
begin
- Result := 96;
+ Result := Screen_dpi_y;
end;
{ TfpgWindowImpl }