자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Firemonkey 파이어몽키에서 스크린의 사이즈 구하는 방법
2013.08.19 20:15
파이어몽키에서는 TScreen의 속성 Width와 Height가 없습니다. 그러면 스크린의 사이즈는 어떻게 구하면 될까요?
Firemonkey 파이어몽키에서 스크린의 사이즈 구하는 방법
2013.08.19 20:15
파이어몽키에서는 TScreen의 속성 Width와 Height가 없습니다. 그러면 스크린의 사이즈는 어떻게 구하면 될까요?
다음과 같이 PLATFORM.의 IFMXScreenService를 사용하시면 됩니다.
uses 절에 FMX.Platform을 추가합니다.
procedure TForm5.FormCreate(Sender: TObject);
var
Service :IFMXScreenService;
Size: TPointF;
begin
if TPlatformServices.Current.SupportsPlatformService(IFMXScreenService) then
Service := TPlatformServices.Current.GetPlatformService(IFMXScreenService) as IFMXScreenService;
Size := service.GetScreenSize;
ShowMessageFmt('Screen.Width = %g, Screen.Height = %g', [Size.X, Size.Y]);
end;