with FLTK.Images.RGB.PNG;
private with FLTK.Widgets;


package Windows is


    Logo : FLTK.Images.RGB.PNG.PNG_Image := FLTK.Images.RGB.PNG.Create ("logo.png");


private


    type Hide_Callback is new FLTK.Widgets.Widget_Callback with null record;


    overriding procedure Call
           (This : in     Hide_Callback;
            Item : in out FLTK.Widgets.Widget'Class);


    Hide_CB : aliased Hide_Callback;


end Windows;