pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-11-23 21:34:53 +02:00
Code Issues Actions Releases Activity

Fixed building errors and warnings on FMX for MacOS and Linux thanks to Christoph Schneider

Browse Source
This commit is contained in:
Salvador Diaz Fau
2021-01-14 16:03:04 +01:00
parent 739b510526
commit b4a2cee7f5
6 changed files with 19 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
source/uCEFFMXBufferPanel.pas
View File

@@ -385,15 +385,15 @@ begin
end;
function TFMXBufferPanel.GetRealScreenScale(var aResultScale : single) : boolean;
{$IFDEF DELPHI24_UP}
{$IFDEF DELPHI24_UP}{$IFDEF MSWINDOWS}
var
TempHandle : TCefWindowHandle;
{$ENDIF}
{$ENDIF}{$ENDIF}
begin
Result := False;
aResultScale := 1;
{$IFDEF DELPHI24_UP}
{$IFDEF DELPHI24_UP}{$IFDEF MSWINDOWS}
TempHandle := GetParentFormHandle;
if (TempHandle <> 0) then
@@ -401,7 +401,7 @@ begin
Result := True;
aResultScale := GetWndScale(TempHandle);
end;
{$ENDIF}
{$ENDIF}{$ENDIF}
end;
function TFMXBufferPanel.GetScreenScale : single;