From bed9af405db67aff779cece9b72029b7b22b0c1e Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Sat, 24 Oct 2009 20:49:55 +0200 Subject: Icon and desktop file Finally, an icon! Viewer uses different one though (from icon theme). We install desktop file and icons by default now. Artwork courtesy of Spajr Gvorcek --- UGnome.pas | 2 ++ 1 file changed, 2 insertions(+) (limited to 'UGnome.pas') 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)]); -- cgit v1.2.3