paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 17:49:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

cocoa: change LOGPIXELSX and -Y to 96 PPI. Issue #31037

Browse Source 
git-svn-id: trunk@53714 -
This commit is contained in:
ondrej 2016-12-18 10:11:27 +00:00
parent ad8da9ff6b
commit 5b8fe624b4
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lcl/interfaces/cocoa/cocoawinapi.inc
View File

@ -1850,9 +1850,9 @@ begin
// todo: change implementation for printers
case Index of
HORZSIZE:
Result := Round(NSScreen.mainScreen.frame.size.width / 72 * 25.4);
Result := Round(NSScreen.mainScreen.frame.size.width / 96 * 25.4);
VERTSIZE:
Result := Round(NSScreen.mainScreen.frame.size.height / 72 * 25.4);
Result := Round(NSScreen.mainScreen.frame.size.height / 96 * 25.4);
HORZRES:
Result := Round(NSScreen.mainScreen.frame.size.width);
BITSPIXEL:
@ -1862,9 +1862,9 @@ begin
SIZEPALETTE:
Result := 0;
LOGPIXELSX:
Result := 72;
Result := 96;
LOGPIXELSY:
Result := 72;
Result := 96;
VERTRES:
Result := Round(NSScreen.mainScreen.frame.size.height);
NUMRESERVED: