UPD: improve the postion of Sharing Service Picker Popover on macOS 13+

(cherry picked from commit 57123c9be6)
This commit is contained in:
rich2014 2025-11-23 14:57:49 +08:00 committed by Alexander Koblov
commit 5b8e7ac9d5

View file

@ -521,10 +521,10 @@ begin
point:= control.ScreenToClient( Mouse.CursorPos );
popupNSRect.origin.x:= point.X;
popupNSRect.origin.y:= point.Y;
popupNSRect.size:= NSZeroSize;
popupNSRect.size:= NSMakeSize( 1, 1 );
picker:= NSSharingServicePicker.alloc.initWithItems( cocoaArray );
picker.showRelativeToRect_ofView_preferredEdge( popupNSRect, NSView(control.handle) , NSMinYEdge );
picker.showRelativeToRect_ofView_preferredEdge( popupNSRect, NSView(control.handle) , NSMaxXEdge );
picker.release;
end;