with FLTK.Widgets.Groups.Windows.Double, FLTK.Images.RGB.PNG; package Windows is type Window is new FLTK.Widgets.Groups.Windows.Double.Double_Window with private; procedure Set_Logo (This : in out Window; Logo : in out FLTK.Images.RGB.PNG.PNG_Image); private type Window is new FLTK.Widgets.Groups.Windows.Double.Double_Window with null record; procedure Hide_CB (Item : in out FLTK.Widgets.Widget'Class); end Windows;