Firemonkey check screen orientation

To check with Delphi / Firemonkey if the screen is in Landscape or Portrait mode i use the FMXPlatform library as in the example: [crayon-676e2c90eb6ef197312874/]