summaryrefslogtreecommitdiff
path: root/UGnome.pas
diff options
context:
space:
mode:
Diffstat (limited to 'UGnome.pas')
-rw-r--r--UGnome.pas2
1 files changed, 2 insertions, 0 deletions
diff --git a/UGnome.pas b/UGnome.pas
index d058f55..005d7f4 100644
--- a/UGnome.pas
+++ b/UGnome.pas
@@ -198,6 +198,7 @@ var libGlib2Handle, libGtk2Handle, libGnome2Handle, libGnomeUI2Handle: Pointer;
gtk_event_box_set_visible_window: procedure (event_box: PGtkEventBox; visible_window: gboolean); cdecl;
gtk_icon_size_lookup_for_settings: function (settings: PGtkSettings; size: TGtkIconSize; width, height: Pgint): gboolean; cdecl;
+ gtk_window_set_icon_name: procedure (window: PGtkWindow; const name: Pgchar); cdecl;
g_filename_display_name: function (const filename: PChar): PChar; cdecl;
{$IFDEF KYLIX}
gtk_message_dialog_new_with_markup: function (parent:PGtkWindow; flags:TGtkDialogFlags;
@@ -1597,6 +1598,7 @@ begin
if libGtk2Handle <> nil then begin
@gtk_event_box_set_visible_window := dlsym(libGtk2Handle, 'gtk_event_box_set_visible_window');
@gtk_icon_size_lookup_for_settings := dlsym(libGtk2Handle, 'gtk_icon_size_lookup_for_settings');
+ @gtk_window_set_icon_name := dlsym(libGtk2Handle, 'gtk_window_set_icon_name');
@gtk_message_dialog_new_with_markup := dlsym(libGtk2Handle, 'gtk_message_dialog_new_with_markup');
DebugMsg(['libgtk-x11-2.0.so loaded, @gtk_event_box_set_visible_window = 0x', IntToHex(QWORD(@gtk_event_box_set_visible_window), 8),
', @gtk_icon_size_lookup_for_settings = 0x', IntToHex(QWORD(@gtk_icon_size_lookup_for_settings), 8)]);