如何在Firemonkey XE3中获取屏幕分辨率？

Question

如何在Firemonkey XE3中获取屏幕分辨率？

delphifiremonkeydelphi-xe3

5

我该如何在Firemonkey 2（Delphi XE3）中获取屏幕分辨率？

- Wayfer

1个回答

网页内容由stack overflow 提供, 点击上面的

可以查看英文原文，
原文链接

- David Heffernan · Accepted Answer

XE3中的情况已经全部改变。平台支持已经完全重构。更多信息请参见Pawel Glowacki的文章。

var
  ScreenSvc: IFMXScreenService;
  Size: TPointF;
begin
  if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService, IInterface(ScreenSvc)) then
  begin
    Size := ScreenSvc.GetScreenSize;
    ....
  end;
end;

尽管进行了全面改进，但如果您有多个显示器，则仍然没有太大的用处。也许FMX2中有一些多监视器支持，但显然不在IFMXScreenService中提供。