diff options
Diffstat (limited to 'src/fltk-widgets-menus-choices.ads')
| -rw-r--r-- | src/fltk-widgets-menus-choices.ads | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/fltk-widgets-menus-choices.ads b/src/fltk-widgets-menus-choices.ads index 6d12fc9..7a5c225 100644 --- a/src/fltk-widgets-menus-choices.ads +++ b/src/fltk-widgets-menus-choices.ads @@ -4,6 +4,11 @@ -- Released into the public domain +limited with + + FLTK.Widgets.Groups; + + package FLTK.Widgets.Menus.Choices is @@ -22,6 +27,12 @@ package FLTK.Widgets.Menus.Choices is Text : in String := "") return Choice; + function Create + (Parent : in out FLTK.Widgets.Groups.Group'Class; + X, Y, W, H : in Integer; + Text : in String := "") + return Choice; + end Forge; |