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

Update to CEF 87.1.13

Browse Source 
Fixed some FMX compilation issues in Linux thanks to Christoph Schneider.
This commit is contained in:
Salvador Diaz Fau
2021-01-08 16:01:06 +01:00
parent e19ecae2b5
commit 62753fa7f9
7 changed files with 28 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
source/uCEFMiscFunctions.pas
View File

@ -76,8 +76,8 @@ uses
const
Kernel32DLL = 'kernel32.dll';
SHLWAPIDLL = 'shlwapi.dll';
NTDLL = 'ntdll.dll';
User32DLL = 'User32.dll';
NTDLL = 'ntdll.dll';
User32DLL = 'User32.dll';
type
TOSVersionInfoEx = record
@ -762,14 +762,16 @@ end;
{$ENDIF}
{$IFDEF LINUX}
procedure WindowInfoAsChild(var aWindowInfo : TCefWindowInfo; aParent : TCefWindowHandle; aRect : TRect; const aWindowName : ustring = '');
procedure WindowInfoAsChild(var aWindowInfo : TCefWindowInfo; aParent : TCefWindowHandle; aRect : TRect; const aWindowName : ustring = '');
var
TempParent : TCefWindowHandle;
begin
// TODO: Find a way to get the right "parent_window" in FMX
TempParent := aParent;
{$IFDEF FPC}
if ValidCefWindowHandle(aParent) and (PGtkWidget(aParent)^.window <> nil) then
TempParent := gdk_window_xwindow(PGtkWidget(aParent)^.window)
else
TempParent := aParent;
TempParent := gdk_window_xwindow(PGtkWidget(aParent)^.window);
{$ENDIF}
aWindowInfo.window_name := CefString(aWindowName);
aWindowInfo.x := aRect.left;