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

Cocoa: cleanup in CocoaUtils

Browse Source
This commit is contained in:
rich2014 2023-10-28 19:31:49 +08:00
parent 408f836d14
commit a58d6acc3d
1 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lcl/interfaces/cocoa/cocoautils.pas
View File

@ -51,7 +51,6 @@ function NSPrimaryScreen: NSScreen;
function NSPrimaryScreenFrame: NSRect;
function NSGlobalScreenFrame: NSRect;
function NSGlobalScreenLCLFrame: NSRect;
function NSGlobalScreenHeight: CGFloat;
function NSGlobalScreenBottom: CGFloat;
function IndexToHMonitor(i: NSUInteger): HMonitor;
@ -828,12 +827,6 @@ begin
Result.origin.y:= NSPrimaryScreenFrame.size.height - NSMaxY(Result);
end;
// the height of global full virtual display
function NSGlobalScreenHeight: CGFloat;
begin
Result:= NSGlobalScreenFrame.size.height;
end;
// the bottom of global full virtual display
// for cocoa window/screen to lcl coordinate
function NSGlobalScreenBottom: CGFloat;