diff options
Diffstat (limited to 'src/fltk-widgets-valuators-sliders.ads')
| -rw-r--r-- | src/fltk-widgets-valuators-sliders.ads | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/src/fltk-widgets-valuators-sliders.ads b/src/fltk-widgets-valuators-sliders.ads index c89cb56..2307004 100644 --- a/src/fltk-widgets-valuators-sliders.ads +++ b/src/fltk-widgets-valuators-sliders.ads @@ -4,6 +4,11 @@ -- Released into the public domain +limited with + + FLTK.Widgets.Groups; + + package FLTK.Widgets.Valuators.Sliders is @@ -28,11 +33,24 @@ package FLTK.Widgets.Valuators.Sliders is return Slider; function Create + (Parent : in out FLTK.Widgets.Groups.Group'Class; + X, Y, W, H : in Integer; + Text : in String := "") + return Slider; + + function Create (Kind : in Slider_Kind; X, Y, W, H : in Integer; Text : in String := "") return Slider; + function Create + (Parent : in out FLTK.Widgets.Groups.Group'Class; + Kind : in Slider_Kind; + X, Y, W, H : in Integer; + Text : in String := "") + return Slider; + end Forge; |