mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2024-11-15 15:55:56 +01: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…
Reference in New Issue
Block a user