diff options
Diffstat (limited to 'UCoreUtils.pas')
| -rw-r--r-- | UCoreUtils.pas | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/UCoreUtils.pas b/UCoreUtils.pas index 1e531a3..a5019d8 100644 --- a/UCoreUtils.pas +++ b/UCoreUtils.pas @@ -21,7 +21,7 @@ unit UCoreUtils; interface -uses SysUtils, Classes, lazglib2, lazgdk3, lazgtk3, GTKClasses, UEngines, ULibc; +uses SysUtils, Classes, lazglib2, lazgobject2, lazgdk3, lazgtk3, GTKClasses, UEngines, ULibc; type PIntArray = ^TIntArray; @@ -828,10 +828,10 @@ begin gtk_about_dialog_set_website(PGtkAboutDialog(about_dialog), PChar('https://tuxcmd.sourceforge.net/')); gtk_about_dialog_set_authors(PGtkAboutDialog(about_dialog), @Authors); gtk_about_dialog_set_translator_credits(PGtkAboutDialog(about_dialog), Translations); - // TODO -// gtk_about_dialog_set_logo(PGtkAboutDialog(about_dialog), AppIcon128.FPixbuf); + gtk_about_dialog_set_logo(PGtkAboutDialog(about_dialog), AppIcon128.FPixbuf); gtk_window_set_transient_for(PGtkWindow(about_dialog), PGtkWindow(FMain.FWidget)); gtk_dialog_run(PGtkDialog(about_dialog)); + g_object_unref(PGObject(about_dialog)); end; procedure SetupAppIcon; |