[gtkada] Icon in title bar

[manuel.op.de.coul at eon-benelux.com]

>How would one go about setting an icon in a title bar?  Haven't found
>anything obvious in the docs.

Like this:

with Gdk.Window; use Gdk.Window;
with Gtk.Pixmap; use Gtk.Pixmap;

   Set_Icon(Get_Window(My_Window),
     Icon_Window => null,
     Pixmap => Get_Pixmap(Create_Pixmap(My_Icon, My_Window)),
     Mask => null);

This works on Unix, but does not on Win32 for me. I don't know why.
I think either a bug, or not implemented. Does anyone else know?

Manuel