You've already forked CEF4Delphi
mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-08-04 21:32:54 +02:00
Fixed backwards compatibility issue with TFMXWindowParent in XE2
This commit is contained in:
@@ -60,8 +60,9 @@ type
|
||||
function GetChildWindowHandle : HWND;
|
||||
procedure UpdateSize;
|
||||
{$ENDIF}
|
||||
{$IFDEF DELPHI17_UP}
|
||||
procedure Resize; override;
|
||||
|
||||
{$ENDIF}
|
||||
public
|
||||
{$IFDEF MSWINDOWS}
|
||||
procedure Reparent(const aNewParentHandle : {$IFDEF DELPHI18_UP}TWindowHandle{$ELSE}TFmxHandle{$ENDIF});
|
||||
@@ -87,6 +88,7 @@ implementation
|
||||
uses
|
||||
System.SysUtils, FMX.Platform, FMX.Platform.Win;
|
||||
|
||||
{$IFDEF DELPHI17_UP}
|
||||
procedure TFMXWindowParent.Resize;
|
||||
begin
|
||||
inherited Resize;
|
||||
@@ -95,6 +97,7 @@ begin
|
||||
UpdateSize;
|
||||
{$ENDIF}
|
||||
end;
|
||||
{$ENDIF}
|
||||
|
||||
{$IFDEF MSWINDOWS}
|
||||
function TFMXWindowParent.GetChildWindowHandle : HWND;
|
||||
|
@@ -2,7 +2,7 @@
|
||||
"UpdateLazPackages" : [
|
||||
{
|
||||
"ForceNotify" : true,
|
||||
"InternalVersion" : 447,
|
||||
"InternalVersion" : 448,
|
||||
"Name" : "cef4delphi_lazarus.lpk",
|
||||
"Version" : "107.1.12"
|
||||
}
|
||||
|
Reference in New Issue
Block a user