diff options
author | Jed Barber <jjbarber@y7mail.com> | 2016-11-14 14:43:10 +1100 |
---|---|---|
committer | Jed Barber <jjbarber@y7mail.com> | 2016-11-14 14:43:10 +1100 |
commit | 770a95e888849f0756c98079a90164b832b1825f (patch) | |
tree | 86ddd7a6f1764990b338c71bece17bdd9222d5cd /src/fltk_binding/fltk-widgets-menus.ads | |
parent | d539a4637adf17eb9b92c71f61971ce774157f39 (diff) |
Edit and search menu items now grey themselves out when appropriate
Diffstat (limited to 'src/fltk_binding/fltk-widgets-menus.ads')
-rw-r--r-- | src/fltk_binding/fltk-widgets-menus.ads | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/src/fltk_binding/fltk-widgets-menus.ads b/src/fltk_binding/fltk-widgets-menus.ads index cf6fcf7..0346d2d 100644 --- a/src/fltk_binding/fltk-widgets-menus.ads +++ b/src/fltk_binding/fltk-widgets-menus.ads @@ -60,6 +60,12 @@ package FLTK.Widgets.Menus is Flags : in Menu_Flag := Flag_Normal); + function Find_Item + (This : in Menu'Class; + Name : in String) + return Menu_Item; + + function Chosen (This : in Menu'Class) return Menu_Item; @@ -70,6 +76,14 @@ package FLTK.Widgets.Menus is return Boolean; + procedure Activate + (Item : in Menu_Item); + + + procedure Deactivate + (Item : in Menu_Item); + + private |