diff options
Diffstat (limited to 'src/windows-about.ads')
| -rw-r--r-- | src/windows-about.ads | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/src/windows-about.ads b/src/windows-about.ads index 0d605f9..f27ad26 100644 --- a/src/windows-about.ads +++ b/src/windows-about.ads @@ -8,7 +8,7 @@ private with FLTK.Widgets.Buttons.Enter; package Windows.About is - type About_Window is new FLTK.Widgets.Groups.Windows.Double.Double_Window with private; + type About_Window is new Window with private; function Create @@ -26,10 +26,15 @@ package Windows.About is return About_Window; + procedure Set_Logo + (This : in out About_Window; + Logo : in out FLTK.Images.RGB.PNG.PNG_Image); + + private - type About_Window is new FLTK.Widgets.Groups.Windows.Double.Double_Window with + type About_Window is new Window with record Picture : FLTK.Widgets.Boxes.Box; Heading : FLTK.Widgets.Boxes.Box; |