mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-02-12 10:26:05 +02:00
Delphi 10 Seattle backwards compatibility fix
This commit is contained in:
parent
a4067cf44c
commit
3ab78ad28c
@ -377,12 +377,12 @@ begin
|
||||
end;
|
||||
|
||||
function TFMXBufferPanel.GetScreenScale : Single;
|
||||
{$IFDEF MSWINDOWS}
|
||||
{$IFDEF VER310}
|
||||
var
|
||||
TempHandle : TCefWindowHandle;
|
||||
{$ENDIF}
|
||||
begin
|
||||
{$IFDEF MSWINDOWS}
|
||||
{$IFDEF VER310}
|
||||
TempHandle := GetParentFormHandle;
|
||||
|
||||
if (TempHandle <> 0) then
|
||||
|
@ -157,12 +157,12 @@ begin
|
||||
end;
|
||||
|
||||
function TFMXChromium.GetScreenScale : Single;
|
||||
{$IFDEF MSWINDOWS}
|
||||
{$IFDEF VER310}
|
||||
var
|
||||
TempHandle : TCefWindowHandle;
|
||||
{$ENDIF}
|
||||
begin
|
||||
{$IFDEF MSWINDOWS}
|
||||
{$IFDEF VER310}
|
||||
TempHandle := GetParentFormHandle;
|
||||
|
||||
if (TempHandle <> 0) then
|
||||
|
@ -2,7 +2,7 @@
|
||||
"UpdateLazPackages" : [
|
||||
{
|
||||
"ForceNotify" : true,
|
||||
"InternalVersion" : 199,
|
||||
"InternalVersion" : 200,
|
||||
"Name" : "cef4delphi_lazarus.lpk",
|
||||
"Version" : "86.0.23.0"
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user