From fa595e9e5b9c7692f21df548a0d06b5a3671fbc1 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Mon, 14 Nov 2016 14:43:10 +1100 Subject: Edit and search menu items now grey themselves out when appropriate --- fltk-widgets-menus.ads | 14 ++++++++++++++ 1 file changed, 14 insertions(+) (limited to 'fltk-widgets-menus.ads') diff --git a/fltk-widgets-menus.ads b/fltk-widgets-menus.ads index cf6fcf7..0346d2d 100644 --- a/fltk-widgets-menus.ads +++ b/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 -- cgit