Missing item: TPlacement.plTopLeft

FMX TMS FMX UI Pack
1

Hallo,

 
I have a screen layout on an iPhone/iPad with a button on the bottom right side of the screen.
That means I need to show the TTMSFMXPopup on the Top Left side of this button.
But unfortunately the TPlacement value "plTopLeft" is missing.
How to solve that?
 
best regards,
 
Thomas
 
2
  TMSFMXPopup1.Placement := TPlacement.plAbsolute;
  TMSFMXPopup1.ArrowPosition := TTMSFMXPopupShapeArrowPosition.paBottomRight;
  TMSFMXPopup1.PlacementRectangle.Left := Button1.Position.X + Button1.Width + Self.Left - TMSFMXPopup1.Width;
  TMSFMXPopup1.PlacementRectangle.Top := Button1.Position.Y + Button1.Height + Self.Top - TMSFMXPopup1.Height;
  TMSFMXPopup1.Popup;

This code should do it.

Kind Regards, 
Scheldeman Pieter
3

Hello Pieter,

 
thank you for the swift response!
Yes that works, but "TPlacement.plTopLeft" would be much neater of course..
 
best regards,
 
Thomas
 
4

Yes of course, we have added this on our todolist for implementation.


Kind Regards,
Scheldeman Pieter