Fixed build issue in Delphi

This commit is contained in:
salvadordf 2023-12-23 19:27:38 +01:00
parent a0c8eda6e0
commit 1562a911fc
2 changed files with 4 additions and 10 deletions

View File

@ -53,15 +53,9 @@ function gdk_screen_get_resolution(screen:PGdkScreen):gdouble; cdecl; external '
{$ENDIF}
{$IFDEF FPC}
{$IFDEF LCLGTK3}
{$IF LCL_FULLVERSION>3000000}
function gdk_x11_window_get_xid(window: PGdkWindow): TXID; cdecl; external LazGdk3_library;
function gdk_x11_get_default_xdisplay: PDisplay; cdecl; external LazGdk3_library;
procedure gdk_set_allowed_backends(const backends: PGchar); cdecl; external LazGdk3_library;
{$ELSE}
function gdk_x11_window_get_xid(window: PGdkWindow): TXID; cdecl; external Gdk3_library;
function gdk_x11_get_default_xdisplay: PDisplay; cdecl; external Gdk3_library;
procedure gdk_set_allowed_backends(const backends: PGchar); cdecl; external Gdk3_library;
{$ENDIF}
function gdk_x11_window_get_xid(window: PGdkWindow): TXID; cdecl; external 'libgdk-3.so.0';
function gdk_x11_get_default_xdisplay: PDisplay; cdecl; external 'libgdk-3.so.0';
procedure gdk_set_allowed_backends(const backends: PGchar); cdecl; external 'libgdk-3.so.0';
{$ENDIF}
procedure ShowX11Message(const aMessage : string);
{$ENDIF}{$ENDIF}

View File

@ -2,7 +2,7 @@
"UpdateLazPackages" : [
{
"ForceNotify" : true,
"InternalVersion" : 548,
"InternalVersion" : 549,
"Name" : "cef4delphi_lazarus.lpk",
"Version" : "120.1.10"
}