pascal/CEF4Delphi
1
0
Fork 0
mirror of https://github.com/salvadordf/CEF4Delphi.git synced 2025-09-30 21:28:55 +02:00
Code Issues Actions Releases Activity

Added code comments to GTKBrowser

Browse Source 
Removed overloaded UseDefaultX11VisualForGtk
Removed overloaded FlushDisplay
Added Linux Mint 22.2 mention
This commit is contained in:
Salvador Díaz Fau
2025-09-09 17:36:08 +02:00
parent 491eba7bc5
commit 0a97240c4c
4 changed files with 38 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
source/uCEFLinuxFunctions.pas
View File

@@ -65,10 +65,8 @@ procedure gdk_set_allowed_backends(const backends: PGchar); cdecl; external 'lib
function gdk_x11_display_get_xdisplay(display: PGdkDisplay): PDisplay; cdecl; external 'libgdk-3.so.0';
function gdk_x11_screen_get_screen_number(screen: PGdkScreen): longint; cdecl; external 'libgdk-3.so.0';
function gdk_x11_visual_get_xvisual(visual: PGdkVisual): PVisual; cdecl; external 'libgdk-3.so.0';
procedure UseDefaultX11VisualForGtk(widget : PGtkWidget); overload;
procedure UseDefaultX11VisualForGtk(aHandle : TCefWindowHandle); overload;
procedure FlushDisplay(widget : PGtkWidget); overload;
procedure FlushDisplay(aHandle : TCefWindowHandle); overload;
procedure UseDefaultX11VisualForGtk(widget : PGtkWidget);
procedure FlushDisplay(widget : PGtkWidget);
{$ENDIF}
procedure ShowX11Message(const aMessage : string);
{$ENDIF}{$ENDIF}
@@ -735,11 +733,6 @@ begin
g_list_free(visuals);
end;
procedure UseDefaultX11VisualForGtk(aHandle : TCefWindowHandle);
begin
UseDefaultX11VisualForGtk(TGtk3Widget(aHandle).Widget);
end;
procedure FlushDisplay(widget : PGtkWidget);
var
gdk_window : PGdkWindow;
@@ -749,11 +742,6 @@ begin
display := gdk_window_get_display(gdk_window);
gdk_display_flush(display);
end;
procedure FlushDisplay(aHandle : TCefWindowHandle);
begin
FlushDisplay(TGtk3Widget(aHandle).Widget);
end;
{$ENDIF}
{$ENDIF}