pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-06-12 22:07:39 +02:00
Code Issues Actions Releases Activity

Issue #273 fixed

Browse Source 
- Added TFMXChromium.ScreenScale property
This commit is contained in:
Salvador Díaz Fau
2020-04-09 18:43:03 +02:00
parent c9b2af2a5e
commit 846aeddd54
8 changed files with 57 additions and 55 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
demos/Delphi_FMX/FMXToolBoxBrowser/uChildForm.pas
View File

@ -265,11 +265,14 @@ begin
end;
function TChildForm.GetFMXWindowParentRect : System.Types.TRect;
var
TempScale : single;
begin
TempScale := FMXChromium1.ScreenScale;
Result.Left := 0;
Result.Top := 0;
Result.Right := ClientWidth - 1;
Result.Bottom := ClientHeight - 1;
Result.Right := round(ClientWidth * TempScale) - 1;
Result.Bottom := round(ClientHeight * TempScale) - 1;
end;
procedure TChildForm.ResizeChild;