From db361ed6d8ba155be78584cd5e3ece71cebae733 Mon Sep 17 00:00:00 2001 From: Salvador Diaz Fau Date: Tue, 17 Nov 2020 15:09:02 +0100 Subject: [PATCH] Use the custom conditional compilation directives --- source/uCEFFMXBufferPanel.pas | 4 ++-- source/uCEFFMXChromium.pas | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/source/uCEFFMXBufferPanel.pas b/source/uCEFFMXBufferPanel.pas index 081b719a..d3e6813d 100644 --- a/source/uCEFFMXBufferPanel.pas +++ b/source/uCEFFMXBufferPanel.pas @@ -377,12 +377,12 @@ function TFMXBufferPanel.GetParentFormHandle : TCefWindowHandle; 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 diff --git a/source/uCEFFMXChromium.pas b/source/uCEFFMXChromium.pas index a1c721b8..fbfb1414 100644 --- a/source/uCEFFMXChromium.pas +++ b/source/uCEFFMXChromium.pas @@ -157,12 +157,12 @@ function TFMXChromium.GetParentForm : TCustomForm; 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