diff --git a/source/uCEFLinuxFunctions.pas b/source/uCEFLinuxFunctions.pas index b6504795..b8e508f1 100644 --- a/source/uCEFLinuxFunctions.pas +++ b/source/uCEFLinuxFunctions.pas @@ -32,10 +32,10 @@ procedure GdkEventKeyToCEFKeyEvent(GdkEvent: PGdkEventKey; var aCEFKeyEvent : TC function KeyboardCodeFromXKeysym(keysym : uint32) : integer; {$IF DEFINED(LINUXFMX) or DEFINED(LCLGTK2) or (DEFINED(LCLGTK3) and (LCL_FULLVERSION<3000000))} function GetCefStateModifiers(state : uint32) : integer; -{$ENDIF} +{$IFEND} {$IF DEFINED(LCLGTK3) and (LCL_FULLVERSION>3000000)} function GetCefStateModifiers(state : TGdkModifierType) : integer; -{$ENDIF} +{$IFEND} function GdkEventToWindowsKeyCode(Event: PGdkEventKey) : integer; function GetWindowsKeyCodeWithoutLocation(key_code : integer) : integer; function GetControlCharacter(windows_key_code : integer; shift : boolean) : integer; @@ -485,7 +485,7 @@ begin if ((state and GDK_BUTTON3_MASK) <> 0) then Result := Result or EVENTFLAG_RIGHT_MOUSE_BUTTON; end; -{$ENDIF} +{$IFEND} {$IF DEFINED(LCLGTK3) and (LCL_FULLVERSION>3000000)} function GetCefStateModifiers(state : TGdkModifierType) : integer; begin @@ -512,7 +512,7 @@ begin if (GDK_BUTTON3_MASK in state) then Result := Result or EVENTFLAG_RIGHT_MOUSE_BUTTON; end; -{$ENDIF} +{$IFEND} function GdkEventToWindowsKeyCode(event: PGdkEventKey) : integer; var diff --git a/update_CEF4Delphi.json b/update_CEF4Delphi.json index 940534c1..b4c8ea93 100644 --- a/update_CEF4Delphi.json +++ b/update_CEF4Delphi.json @@ -2,7 +2,7 @@ "UpdateLazPackages" : [ { "ForceNotify" : true, - "InternalVersion" : 634, + "InternalVersion" : 635, "Name" : "cef4delphi_lazarus.lpk", "Version" : "127.1.5" }