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

Use the custom conditional compilation directives

Browse Source
This commit is contained in:
Salvador Diaz Fau 2020-11-17 15:09:02 +01:00
parent 3ab78ad28c
commit db361ed6d8
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
source/uCEFFMXBufferPanel.pas
View File

@ -377,12 +377,12 @@ begin
end;
function TFMXBufferPanel.GetScreenScale : Single;
{$IFDEF VER310}
{$IFDEF DELPHI24_UP}
var
TempHandle : TCefWindowHandle;
{$ENDIF}
begin
{$IFDEF VER310}
{$IFDEF DELPHI24_UP}
TempHandle := GetParentFormHandle;
if (TempHandle <> 0) then

4
source/uCEFFMXChromium.pas
View File

@ -157,12 +157,12 @@ begin
end;
function TFMXChromium.GetScreenScale : Single;
{$IFDEF VER310}
{$IFDEF DELPHI24_UP}
var
TempHandle : TCefWindowHandle;
{$ENDIF}
begin
{$IFDEF VER310}
{$IFDEF DELPHI24_UP}
TempHandle := GetParentFormHandle;
if (TempHandle <> 0) then