ncurses 5.6
[ncurses.git] / doc / html / ada / terminal_interface-curses-menus__ads.htm
1 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
2 <HTML><HEAD><TITLE>terminal_interface-curses-menus.ads</TITLE></HEAD>
3 <BODY>
4 <HR><DIV ALIGN="center"><H1> File : terminal_interface-curses-menus.ads </H1></DIV><HR>
5 <PRE>
6
7 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
8 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
9 <FONT COLOR=green><EM>--                           <A HREF="http://www.gnat.com">GNAT</A> ncurses Binding                           --</EM></FONT>
10 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
11 <FONT COLOR=green><EM>--                      Terminal_Interface.Curses.Menu                      --</EM></FONT>
12 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
13 <FONT COLOR=green><EM>--                                 S P E C                                  --</EM></FONT>
14 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
15 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
16 <FONT COLOR=green><EM>-- Copyright (c) 1998,2006 Free Software Foundation, Inc.                   --</EM></FONT>
17 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
18 <FONT COLOR=green><EM>-- Permission is hereby granted, free of charge, to any person obtaining a  --</EM></FONT>
19 <FONT COLOR=green><EM>-- copy of this software and associated documentation files (the            --</EM></FONT>
20 <FONT COLOR=green><EM>-- "Software"), to deal in the Software without restriction, including      --</EM></FONT>
21 <FONT COLOR=green><EM>-- without limitation the rights to use, copy, modify, merge, publish,      --</EM></FONT>
22 <FONT COLOR=green><EM>-- distribute, distribute with modifications, sublicense, and/or sell       --</EM></FONT>
23 <FONT COLOR=green><EM>-- copies of the Software, and to permit persons to whom the Software is    --</EM></FONT>
24 <FONT COLOR=green><EM>-- furnished to do so, subject to the following conditions:                 --</EM></FONT>
25 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
26 <FONT COLOR=green><EM>-- The above copyright notice and this permission notice shall be included  --</EM></FONT>
27 <FONT COLOR=green><EM>-- in all copies or substantial portions of the Software.                   --</EM></FONT>
28 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
29 <FONT COLOR=green><EM>-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  --</EM></FONT>
30 <FONT COLOR=green><EM>-- OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               --</EM></FONT>
31 <FONT COLOR=green><EM>-- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   --</EM></FONT>
32 <FONT COLOR=green><EM>-- IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   --</EM></FONT>
33 <FONT COLOR=green><EM>-- DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    --</EM></FONT>
34 <FONT COLOR=green><EM>-- OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    --</EM></FONT>
35 <FONT COLOR=green><EM>-- THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               --</EM></FONT>
36 <FONT COLOR=green><EM>--                                                                          --</EM></FONT>
37 <FONT COLOR=green><EM>-- Except as contained in this notice, the name(s) of the above copyright   --</EM></FONT>
38 <FONT COLOR=green><EM>-- holders shall not be used in advertising or otherwise to promote the     --</EM></FONT>
39 <FONT COLOR=green><EM>-- sale, use or other dealings in this Software without prior written       --</EM></FONT>
40 <FONT COLOR=green><EM>-- authorization.                                                           --</EM></FONT>
41 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
42 <FONT COLOR=green><EM>--  Author:  Juergen Pfeifer, 1996</EM></FONT>
43 <FONT COLOR=green><EM>--  Version Control:</EM></FONT>
44 <FONT COLOR=green><EM>--  @Revision: 1.26 @</EM></FONT>
45 <FONT COLOR=green><EM>--  @Date: 2006/06/25 14:30:22 @</EM></FONT>
46 <FONT COLOR=green><EM>--  Binding Version 01.00</EM></FONT>
47 <FONT COLOR=green><EM>------------------------------------------------------------------------------</EM></FONT>
48 <FONT COLOR=green><EM>--  menu binding.</EM></FONT>
49 <FONT COLOR=green><EM>--  This module is generated. Please don't change it manually!</EM></FONT>
50 <FONT COLOR=green><EM>--  Run the generator instead.</EM></FONT>
51 <FONT COLOR=green><EM>--  |</EM></FONT>
52 <b>with</b> System;
53 <b>with</b> Ada.Characters.Latin_1;
54
55 <b>package</b> Terminal_Interface.Curses.Menus <b>is</b>
56    <b>pragma</b> Preelaborate (Terminal_Interface.Curses.Menus);
57    <b>pragma</b> Linker_Options ("-lmenu");
58    <b>pragma</b> Linker_Options ("-lncurses");
59
60    Space : Character <b>renames</b> Ada.Characters.Latin_1.Space;
61
62    <b>type</b> <FONT COLOR=red><A NAME="ref_57_9">Item</A></FONT> <b>is</b> <b>private</b>;
63    <b>type</b> Menu <b>is</b> <b>private</b>;
64
65    <FONT COLOR=green><EM>---------------------------</EM></FONT>
66    <FONT COLOR=green><EM>--  Interface constants  --</EM></FONT>
67    <FONT COLOR=green><EM>---------------------------</EM></FONT>
68    <FONT COLOR=red><A NAME="ref_63_4">Null_Item</A></FONT> : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_57_9">Item</A>;
69    Null_Menu : <b>constant</b> Menu;
70
71    <b>subtype</b> Menu_Request_Code <b>is</b> Key_Code
72      <b>range</b> (Key_Max + 1) .. (Key_Max + 17);
73
74    <FONT COLOR=green><EM>--  The prefix M_ stands for "Menu Request"</EM></FONT>
75    <FONT COLOR=red><A NAME="ref_70_4">M_Left_Item</A></FONT>       : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 1;
76    <FONT COLOR=red><A NAME="ref_71_4">M_Right_Item</A></FONT>      : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 2;
77    <FONT COLOR=red><A NAME="ref_72_4">M_Up_Item</A></FONT>         : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 3;
78    <FONT COLOR=red><A NAME="ref_73_4">M_Down_Item</A></FONT>       : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 4;
79    <FONT COLOR=red><A NAME="ref_74_4">M_ScrollUp_Line</A></FONT>   : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 5;
80    <FONT COLOR=red><A NAME="ref_75_4">M_ScrollDown_Line</A></FONT> : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 6;
81    <FONT COLOR=red><A NAME="ref_76_4">M_ScrollDown_Page</A></FONT> : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 7;
82    <FONT COLOR=red><A NAME="ref_77_4">M_ScrollUp_Page</A></FONT>   : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 8;
83    <FONT COLOR=red><A NAME="ref_78_4">M_First_Item</A></FONT>      : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 9;
84    <FONT COLOR=red><A NAME="ref_79_4">M_Last_Item</A></FONT>       : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 10;
85    <FONT COLOR=red><A NAME="ref_80_4">M_Next_Item</A></FONT>       : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 11;
86    <FONT COLOR=red><A NAME="ref_81_4">M_Previous_Item</A></FONT>   : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 12;
87    <FONT COLOR=red><A NAME="ref_82_4">M_Toggle_Item</A></FONT>     : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 13;
88    <FONT COLOR=red><A NAME="ref_83_4">M_Clear_Pattern</A></FONT>   : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 14;
89    <FONT COLOR=red><A NAME="ref_84_4">M_Back_Pattern</A></FONT>    : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 15;
90    <FONT COLOR=red><A NAME="ref_85_4">M_Next_Match</A></FONT>      : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> := <A HREF="terminal_interface-curses__ads.htm#ref_207_4">Key_Max</A> + 16;
91    M_Previous_Match  : <b>constant</b> Menu_Request_Code := Key_Max + 17;
92
93    <FONT COLOR=green><EM>--  For those who like the old 'C' names for the request codes</EM></FONT>
94    REQ_LEFT_ITEM     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_70_4">M_Left_Item</A>;
95    REQ_RIGHT_ITEM    : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_71_4">M_Right_Item</A>;
96    REQ_UP_ITEM       : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_72_4">M_Up_Item</A>;
97    REQ_DOWN_ITEM     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_73_4">M_Down_Item</A>;
98    REQ_SCR_ULINE     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_74_4">M_ScrollUp_Line</A>;
99    REQ_SCR_DLINE     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_75_4">M_ScrollDown_Line</A>;
100    REQ_SCR_DPAGE     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_76_4">M_ScrollDown_Page</A>;
101    REQ_SCR_UPAGE     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_77_4">M_ScrollUp_Page</A>;
102    REQ_FIRST_ITEM    : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_78_4">M_First_Item</A>;
103    REQ_LAST_ITEM     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_79_4">M_Last_Item</A>;
104    REQ_NEXT_ITEM     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_80_4">M_Next_Item</A>;
105    REQ_PREV_ITEM     : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_81_4">M_Previous_Item</A>;
106    REQ_TOGGLE_ITEM   : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_82_4">M_Toggle_Item</A>;
107    REQ_CLEAR_PATTERN : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_83_4">M_Clear_Pattern</A>;
108    REQ_BACK_PATTERN  : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_84_4">M_Back_Pattern</A>;
109    REQ_NEXT_MATCH    : <A HREF="terminal_interface-curses-menus__ads.htm#ref_65_12">Menu_Request_Code</A> <b>renames</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_85_4">M_Next_Match</A>;
110    REQ_PREV_MATCH    : Menu_Request_Code <b>renames</b> M_Previous_Match;
111
112    <b>procedure</b> Request_Name (<FONT COLOR=red><A NAME="ref_107_28" HREF="terminal_interface-curses-menus__adb.htm#ref_78_28">Key</A></FONT>  : <b>in</b> Menu_Request_Code;
113                            Name : <b>out</b> String);
114
115    <b>function</b>  Request_Name (Key : Menu_Request_Code) <b>return</b> String;
116    <FONT COLOR=green><EM>--  Same as function</EM></FONT>
117
118    <FONT COLOR=green><EM>------------------</EM></FONT>
119    <FONT COLOR=green><EM>--  Exceptions  --</EM></FONT>
120    <FONT COLOR=green><EM>------------------</EM></FONT>
121
122    Menu_Exception : <b>exception</b>;
123    <FONT COLOR=green><EM>--</EM></FONT>
124    <FONT COLOR=green><EM>--  Menu options</EM></FONT>
125    <FONT COLOR=green><EM>--</EM></FONT>
126    <b>pragma</b> Warnings (Off);
127    <b>type</b> Menu_Option_Set <b>is</b>
128       <b>record</b>
129          <FONT COLOR=red><A NAME="ref_124_10">One_Valued</A></FONT>        : Boolean;
130          <FONT COLOR=red><A NAME="ref_125_10">Show_Descriptions</A></FONT> : Boolean;
131          <FONT COLOR=red><A NAME="ref_126_10">Row_Major_Order</A></FONT>   : Boolean;
132          <FONT COLOR=red><A NAME="ref_127_10">Ignore_Case</A></FONT>       : Boolean;
133          <FONT COLOR=red><A NAME="ref_128_10">Show_Matches</A></FONT>      : Boolean;
134          Non_Cyclic        : Boolean;
135       <b>end</b> <b>record</b>;
136    <b>pragma</b> Convention (C, Menu_Option_Set);
137
138    <b>for</b> Menu_Option_Set <b>use</b>
139       <b>record</b>
140          One_Valued        <b>at</b> 0 <b>range</b>  0 ..  0;
141          Show_Descriptions <b>at</b> 0 <b>range</b>  1 ..  1;
142          Row_Major_Order   <b>at</b> 0 <b>range</b>  2 ..  2;
143          Ignore_Case       <b>at</b> 0 <b>range</b>  3 ..  3;
144          Show_Matches      <b>at</b> 0 <b>range</b>  4 ..  4;
145          Non_Cyclic        <b>at</b> 0 <b>range</b>  5 ..  5;
146       <b>end</b> <b>record</b>;
147    <b>for</b> Menu_Option_Set'Size <b>use</b> 32;
148    <FONT COLOR=green><EM>--  Please note: this rep. clause is generated and may be</EM></FONT>
149    <FONT COLOR=green><EM>--               different on your system.</EM></FONT>
150    <b>pragma</b> Warnings (On);
151
152    <b>function</b> Default_Menu_Options <b>return</b> Menu_Option_Set;
153    <FONT COLOR=green><EM>--  Initial default options for a menu.</EM></FONT>
154    <b>pragma</b> Inline (Default_Menu_Options);
155    <FONT COLOR=green><EM>--</EM></FONT>
156    <FONT COLOR=green><EM>--  Item options</EM></FONT>
157    <FONT COLOR=green><EM>--</EM></FONT>
158    <b>pragma</b> Warnings (Off);
159    <b>type</b> Item_Option_Set <b>is</b>
160       <b>record</b>
161          Selectable  : Boolean;
162       <b>end</b> <b>record</b>;
163    <b>pragma</b> Convention (C, Item_Option_Set);
164
165    <b>for</b> Item_Option_Set <b>use</b>
166       <b>record</b>
167          Selectable  <b>at</b> 0 <b>range</b>  0 ..  0;
168       <b>end</b> <b>record</b>;
169    <b>for</b> Item_Option_Set'Size <b>use</b> 32;
170    <FONT COLOR=green><EM>--  Please note: this rep. clause is generated and may be</EM></FONT>
171    <FONT COLOR=green><EM>--               different on your system.</EM></FONT>
172    <b>pragma</b> Warnings (On);
173
174    <b>function</b> Default_Item_Options <b>return</b> Item_Option_Set;
175    <FONT COLOR=green><EM>--  Initial default options for an item.</EM></FONT>
176    <b>pragma</b> Inline (Default_Item_Options);
177
178    <FONT COLOR=green><EM>--</EM></FONT>
179    <FONT COLOR=green><EM>--  Item Array</EM></FONT>
180    <FONT COLOR=green><EM>--</EM></FONT>
181    <b>type</b> Item_Array <b>is</b> <b>array</b> (Positive <b>range</b> &lt;&gt;) <b>of</b> <b>aliased</b> Item;
182    <b>pragma</b> Convention (C, Item_Array);
183
184    <b>type</b> Item_Array_Access <b>is</b> <b>access</b> Item_Array;
185
186    <b>procedure</b> Free (<FONT COLOR=red><A NAME="ref_181_20" HREF="terminal_interface-curses-menus__adb.htm#ref_993_20">IA</A></FONT>         : <b>in</b> <b>out</b> Item_Array_Access;
187                    Free_Items : Boolean := False);
188    <FONT COLOR=green><EM>--  Release the memory for an allocated item array</EM></FONT>
189    <FONT COLOR=green><EM>--  If Free_Items is True, call Delete() for all the items in</EM></FONT>
190    <FONT COLOR=green><EM>--  the array.</EM></FONT>
191
192    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
193    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/mitem_new.3x.html">mitem_new.3x</A></EM></FONT>
194    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
195
196    <FONT COLOR=green><EM>--  #1A NAME="AFU_1"#2|</EM></FONT>
197    <b>function</b> Create (<FONT COLOR=red><A NAME="ref_192_21" HREF="terminal_interface-curses-menus__adb.htm#ref_95_21">Name</A></FONT>        : String;
198                     Description : String := "") <b>return</b> Item;
199    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_new.3x.html">new_item()</A></EM></FONT>
200    <FONT COLOR=green><EM>--  Not inlined.</EM></FONT>
201
202    <FONT COLOR=green><EM>--  #1A NAME="AFU_2"#2|</EM></FONT>
203    <b>function</b> New_Item (<FONT COLOR=red><A NAME="ref_198_23">Name</A></FONT>        : String;
204              <A HREF="terminal_interface-curses-menus__ads.htm#ref_191_13"> </A>        Description : String := "") <b>return</b> Item
205      <b>renames</b> Create;
206    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_new.3x.html">new_item()</A></EM></FONT>
207
208    <FONT COLOR=green><EM>--  #1A NAME="AFU_3"#2|</EM></FONT>
209    <b>procedure</b> Delete (Itm : <b>in</b> <b>out</b> Item);
210    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_new.3x.html">free_item()</A></EM></FONT>
211    <FONT COLOR=green><EM>--  Resets Itm to Null_Item</EM></FONT>
212
213    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
214    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/mitem_value.3x.html">mitem_value.3x</A></EM></FONT>
215    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
216
217    <FONT COLOR=green><EM>--  #1A NAME="AFU_4"#2|</EM></FONT>
218    <b>procedure</b> Set_Value (<FONT COLOR=red><A NAME="ref_213_25" HREF="terminal_interface-curses-menus__adb.htm#ref_153_25">Itm</A></FONT>   : <b>in</b> Item;
219                         Value : <b>in</b> Boolean := True);
220    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_value.3x.html">set_item_value()</A></EM></FONT>
221    <b>pragma</b> Inline (Set_Value);
222
223    <FONT COLOR=green><EM>--  #1A NAME="AFU_5"#2|</EM></FONT>
224    <b>function</b> Value (Itm : Item) <b>return</b> Boolean;
225    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_value.3x.html">item_value()</A></EM></FONT>
226    <b>pragma</b> Inline (Value);
227
228    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
229    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/mitem_visible.3x.html">mitem_visible.3x</A></EM></FONT>
230    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
231
232    <FONT COLOR=green><EM>--  #1A NAME="AFU_6"#2|</EM></FONT>
233    <b>function</b> Visible (Itm : Item) <b>return</b> Boolean;
234    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_visible.3x.html">item_visible()</A></EM></FONT>
235    <b>pragma</b> Inline (Visible);
236
237    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
238    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/mitem_opts.3x.html">mitem_opts.3x</A></EM></FONT>
239    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
240
241    <FONT COLOR=green><EM>--  #1A NAME="AFU_7"#2|</EM></FONT>
242    <b>procedure</b> Set_Options (<FONT COLOR=red><A NAME="ref_237_27" HREF="terminal_interface-curses-menus__adb.htm#ref_192_27">Itm</A></FONT>     : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_153_9">Item</A>;
243                           Options : <b>in</b> Item_Option_Set);
244    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_opts.3x.html">set_item_opts()</A></EM></FONT>
245    <FONT COLOR=green><EM>--  An overloaded Set_Options is defined later. Pragma Inline appears there</EM></FONT>
246
247    <FONT COLOR=green><EM>--  #1A NAME="AFU_8"#2|</EM></FONT>
248    <b>procedure</b> Switch_Options (<FONT COLOR=red><A NAME="ref_243_30" HREF="terminal_interface-curses-menus__adb.htm#ref_208_30">Itm</A></FONT>     : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_153_9">Item</A>;
249                              <FONT COLOR=red><A NAME="ref_244_30" HREF="terminal_interface-curses-menus__adb.htm#ref_209_30">Options</A></FONT> : <b>in</b> Item_Option_Set;
250                              On      : Boolean := True);
251    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_opts.3x.html">item_opts_on()</A></EM></FONT>
252    <FONT COLOR=green><EM>--  AKA: item_opts_off()</EM></FONT>
253    <FONT COLOR=green><EM>--  An overloaded Switch_Options is defined later.</EM></FONT>
254    <FONT COLOR=green><EM>--  Pragma Inline appears there</EM></FONT>
255
256    <FONT COLOR=green><EM>--  #1A NAME="AFU_9"#2|</EM></FONT>
257    <b>procedure</b> Get_Options (<FONT COLOR=red><A NAME="ref_252_27" HREF="terminal_interface-curses-menus__adb.htm#ref_232_27">Itm</A></FONT>     : <b>in</b>  <A HREF="terminal_interface-curses-menus__ads.htm#ref_153_9">Item</A>;
258                           Options : <b>out</b> Item_Option_Set);
259    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_opts.3x.html">item_opts()</A></EM></FONT>
260
261    <FONT COLOR=green><EM>--  #1A NAME="AFU_10"#2|</EM></FONT>
262    <b>function</b> Get_Options (Itm : Item := Null_Item) <b>return</b> Item_Option_Set;
263    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_opts.3x.html">item_opts()</A></EM></FONT>
264    <FONT COLOR=green><EM>--  An overloaded Get_Options is defined later. Pragma Inline appears there</EM></FONT>
265
266    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
267    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/mitem_name.3x.html">mitem_name.3x</A></EM></FONT>
268    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
269
270    <FONT COLOR=green><EM>--  #1A NAME="AFU_11"#2|</EM></FONT>
271    <b>procedure</b> Name (<FONT COLOR=red><A NAME="ref_266_20" HREF="terminal_interface-curses-menus__adb.htm#ref_251_20">Itm</A></FONT>  : <b>in</b> Item;
272                    Name : <b>out</b> String);
273    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_name.3x.html">item_name()</A></EM></FONT>
274    <b>function</b>  Name (Itm : Item) <b>return</b> String;
275    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_name.3x.html">item_name()</A></EM></FONT>
276    <FONT COLOR=green><EM>--  Implemented as function</EM></FONT>
277    <b>pragma</b> Inline (Name);
278
279    <FONT COLOR=green><EM>--  #1A NAME="AFU_12"#2|</EM></FONT>
280    <b>procedure</b> Description (<FONT COLOR=red><A NAME="ref_275_27" HREF="terminal_interface-curses-menus__adb.htm#ref_268_27">Itm</A></FONT>         : <b>in</b> Item;
281                           Description : <b>out</b> String);
282    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_name.3x.html">item_description();</A></EM></FONT>
283
284    <b>function</b>  Description (Itm : Item) <b>return</b> String;
285    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_name.3x.html">item_description();</A></EM></FONT>
286    <FONT COLOR=green><EM>--  Implemented as function</EM></FONT>
287    <b>pragma</b> Inline (Description);
288
289    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
290    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/mitem_current.3x.html">mitem_current.3x</A></EM></FONT>
291    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
292
293    <FONT COLOR=green><EM>--  #1A NAME="AFU_13"#2|</EM></FONT>
294    <b>procedure</b> Set_Current (<FONT COLOR=red><A NAME="ref_289_27" HREF="terminal_interface-curses-menus__adb.htm#ref_285_27">Men</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_56_9">Menu</A>;
295                           Itm : <b>in</b> Item);
296    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_current.3x.html">set_current_item()</A></EM></FONT>
297    <b>pragma</b> Inline (Set_Current);
298
299    <FONT COLOR=green><EM>--  #1A NAME="AFU_14"#2|</EM></FONT>
300    <b>function</b> Current (Men : Menu) <b>return</b> Item;
301    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_current.3x.html">current_item()</A></EM></FONT>
302    <b>pragma</b> Inline (Current);
303
304    <FONT COLOR=green><EM>--  #1A NAME="AFU_15"#2|</EM></FONT>
305    <b>procedure</b> Set_Top_Row (<FONT COLOR=red><A NAME="ref_300_27" HREF="terminal_interface-curses-menus__adb.htm#ref_312_27">Men</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Menu</A>;
306                           Line : <b>in</b> Line_Position);
307    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_current.3x.html">set_top_row()</A></EM></FONT>
308    <b>pragma</b> Inline (Set_Top_Row);
309
310    <FONT COLOR=green><EM>--  #1A NAME="AFU_16"#2|</EM></FONT>
311    <b>function</b> Top_Row (Men : Menu) <b>return</b> Line_Position;
312    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_current.3x.html">top_row()</A></EM></FONT>
313    <b>pragma</b> Inline (Top_Row);
314
315    <FONT COLOR=green><EM>--  #1A NAME="AFU_17"#2|</EM></FONT>
316    <b>function</b> Get_Index (Itm : Item) <b>return</b> Positive;
317    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/mitem_current.3x.html">item_index()</A></EM></FONT>
318    <FONT COLOR=green><EM>--  Please note that in this binding we start the numbering of items</EM></FONT>
319    <FONT COLOR=green><EM>--  with 1. So this is number is one more than you get from the low</EM></FONT>
320    <FONT COLOR=green><EM>--  level call.</EM></FONT>
321    <b>pragma</b> Inline (Get_Index);
322
323    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
324    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_post.3x.html">menu_post.3x</A></EM></FONT>
325    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
326
327    <FONT COLOR=green><EM>--  #1A NAME="AFU_18"#2|</EM></FONT>
328    <b>procedure</b> Post (<FONT COLOR=red><A NAME="ref_323_20" HREF="terminal_interface-curses-menus__adb.htm#ref_352_20">Men</A></FONT>  : <b>in</b> Menu;
329                    Post : <b>in</b> Boolean := True);
330    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_post.3x.html">post_menu()</A></EM></FONT>
331    <FONT COLOR=green><EM>--  AKA: unpost_menu()</EM></FONT>
332    <b>pragma</b> Inline (Post);
333
334    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
335    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_opts.3x.html">menu_opts.3x</A></EM></FONT>
336    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
337
338    <FONT COLOR=green><EM>--  #1A NAME="AFU_19"#2|</EM></FONT>
339    <b>procedure</b> Set_Options (<FONT COLOR=red><A NAME="ref_334_27" HREF="terminal_interface-curses-menus__adb.htm#ref_372_27">Men</A></FONT>     : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_121_9">Menu</A>;
340                           Options : <b>in</b> Menu_Option_Set);
341    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_opts.3x.html">set_menu_opts()</A></EM></FONT>
342    <b>pragma</b> Inline (Set_Options);
343
344    <FONT COLOR=green><EM>--  #1A NAME="AFU_20"#2|</EM></FONT>
345    <b>procedure</b> Switch_Options (<FONT COLOR=red><A NAME="ref_340_30" HREF="terminal_interface-curses-menus__adb.htm#ref_388_30">Men</A></FONT>     : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_121_9">Menu</A>;
346                              <FONT COLOR=red><A NAME="ref_341_30" HREF="terminal_interface-curses-menus__adb.htm#ref_389_30">Options</A></FONT> : <b>in</b> Menu_Option_Set;
347                              On      : Boolean := True);
348    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_opts.3x.html">menu_opts_on()</A></EM></FONT>
349    <FONT COLOR=green><EM>--  AKA: menu_opts_off()</EM></FONT>
350    <b>pragma</b> Inline (Switch_Options);
351
352    <FONT COLOR=green><EM>--  #1A NAME="AFU_21"#2|</EM></FONT>
353    <b>procedure</b> Get_Options (<FONT COLOR=red><A NAME="ref_348_27" HREF="terminal_interface-curses-menus__adb.htm#ref_412_32">Men</A></FONT>     : <b>in</b>  <A HREF="terminal_interface-curses-menus__ads.htm#ref_121_9">Menu</A>;
354                           Options : <b>out</b> Menu_Option_Set);
355    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_opts.3x.html">menu_opts()</A></EM></FONT>
356
357    <FONT COLOR=green><EM>--  #1A NAME="AFU_22"#2|</EM></FONT>
358    <b>function</b> Get_Options (Men : Menu := Null_Menu) <b>return</b> Menu_Option_Set;
359    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_opts.3x.html">menu_opts()</A></EM></FONT>
360    <b>pragma</b> Inline (Get_Options);
361
362    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
363    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_win.3x.html">menu_win.3x</A></EM></FONT>
364    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
365
366    <FONT COLOR=green><EM>--  #1A NAME="AFU_23"#2|</EM></FONT>
367    <b>procedure</b> Set_Window (<FONT COLOR=red><A NAME="ref_362_26" HREF="terminal_interface-curses-menus__adb.htm#ref_431_26">Men</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Menu</A>;
368                          Win : <b>in</b> Window);
369    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_win.3x.html">set_menu_win()</A></EM></FONT>
370    <b>pragma</b> Inline (Set_Window);
371
372    <FONT COLOR=green><EM>--  #1A NAME="AFU_24"#2|</EM></FONT>
373    <b>function</b> Get_Window (Men : Menu) <b>return</b> Window;
374    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_win.3x.html">menu_win()</A></EM></FONT>
375    <b>pragma</b> Inline (Get_Window);
376
377    <FONT COLOR=green><EM>--  #1A NAME="AFU_25"#2|</EM></FONT>
378    <b>procedure</b> Set_Sub_Window (<FONT COLOR=red><A NAME="ref_373_30" HREF="terminal_interface-curses-menus__adb.htm#ref_455_30">Men</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_57_9">Menu</A>;
379                              Win : <b>in</b> Window);
380    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_win.3x.html">set_menu_sub()</A></EM></FONT>
381    <b>pragma</b> Inline (Set_Sub_Window);
382
383    <FONT COLOR=green><EM>--  #1A NAME="AFU_26"#2|</EM></FONT>
384    <b>function</b> Get_Sub_Window (Men : Menu) <b>return</b> Window;
385    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_win.3x.html">menu_sub()</A></EM></FONT>
386    <b>pragma</b> Inline (Get_Sub_Window);
387
388    <FONT COLOR=green><EM>--  #1A NAME="AFU_27"#2|</EM></FONT>
389    <b>procedure</b> Scale (<FONT COLOR=red><A NAME="ref_384_21" HREF="terminal_interface-curses-menus__adb.htm#ref_479_21">Men</A></FONT>     : <b>in</b> Menu;
390                     <FONT COLOR=red><A NAME="ref_385_21" HREF="terminal_interface-curses-menus__adb.htm#ref_480_21">Lines</A></FONT>   : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
391                     Columns : <b>out</b> Column_Count);
392    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_win.3x.html">scale_menu()</A></EM></FONT>
393    <b>pragma</b> Inline (Scale);
394
395    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
396    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_cursor.3x.html">menu_cursor.3x</A></EM></FONT>
397    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
398
399    <FONT COLOR=green><EM>--  #1A NAME="AFU_28"#2|</EM></FONT>
400    <b>procedure</b> Position_Cursor (Men : Menu);
401    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_cursor.3x.html">pos_menu_cursor()</A></EM></FONT>
402    <b>pragma</b> Inline (Position_Cursor);
403
404    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
405    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_mark.3x.html">menu_mark.3x</A></EM></FONT>
406    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
407
408    <FONT COLOR=green><EM>--  #1A NAME="AFU_29"#2|</EM></FONT>
409    <b>procedure</b> Set_Mark (<FONT COLOR=red><A NAME="ref_404_24" HREF="terminal_interface-curses-menus__adb.htm#ref_511_24">Men</A></FONT>  : <b>in</b> Menu;
410                        Mark : <b>in</b> String);
411    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_mark.3x.html">set_menu_mark()</A></EM></FONT>
412    <b>pragma</b> Inline (Set_Mark);
413
414    <FONT COLOR=green><EM>--  #1A NAME="AFU_30"#2|</EM></FONT>
415    <b>procedure</b> Mark (<FONT COLOR=red><A NAME="ref_410_20" HREF="terminal_interface-curses-menus__adb.htm#ref_530_20">Men</A></FONT>  : <b>in</b>  Menu;
416                    Mark : <b>out</b> String);
417    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_mark.3x.html">menu_mark()</A></EM></FONT>
418
419    <b>function</b>  Mark (Men : Menu) <b>return</b> String;
420    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_mark.3x.html">menu_mark()</A></EM></FONT>
421    <FONT COLOR=green><EM>--  Implemented as function</EM></FONT>
422    <b>pragma</b> Inline (Mark);
423
424    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
425    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_attribs.3x.html">menu_attribs.3x</A></EM></FONT>
426    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
427
428    <FONT COLOR=green><EM>--  #1A NAME="AFU_31"#2|</EM></FONT>
429    <b>procedure</b> Set_Foreground
430      (<FONT COLOR=red><A NAME="ref_425_7" HREF="terminal_interface-curses-menus__adb.htm#ref_549_7">Men</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
431       <FONT COLOR=red><A NAME="ref_426_7" HREF="terminal_interface-curses-menus__adb.htm#ref_550_7">Fore</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;
432       Color : <b>in</b> Color_Pair := Color_Pair'First);
433    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">set_menu_fore()</A></EM></FONT>
434    <b>pragma</b> Inline (Set_Foreground);
435
436    <FONT COLOR=green><EM>--  #1A NAME="AFU_32"#2|</EM></FONT>
437    <b>procedure</b> Foreground (<FONT COLOR=red><A NAME="ref_432_26" HREF="terminal_interface-curses-menus__adb.htm#ref_567_26">Men</A></FONT>   : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
438                          Fore  : <b>out</b> Character_Attribute_Set);
439    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">menu_fore()</A></EM></FONT>
440
441    <FONT COLOR=green><EM>--  #1A NAME="AFU_33"#2|</EM></FONT>
442    <b>procedure</b> Foreground (<FONT COLOR=red><A NAME="ref_437_26" HREF="terminal_interface-curses-menus__adb.htm#ref_576_26">Men</A></FONT>   : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
443                          <FONT COLOR=red><A NAME="ref_438_26" HREF="terminal_interface-curses-menus__adb.htm#ref_577_26">Fore</A></FONT>  : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A>;
444                          Color : <b>out</b> Color_Pair);
445    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">menu_fore()</A></EM></FONT>
446    <b>pragma</b> Inline (Foreground);
447
448    <FONT COLOR=green><EM>--  #1A NAME="AFU_34"#2|</EM></FONT>
449    <b>procedure</b> Set_Background
450      (<FONT COLOR=red><A NAME="ref_445_7" HREF="terminal_interface-curses-menus__adb.htm#ref_588_7">Men</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
451       <FONT COLOR=red><A NAME="ref_446_7" HREF="terminal_interface-curses-menus__adb.htm#ref_589_7">Back</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;
452       Color : <b>in</b> Color_Pair := Color_Pair'First);
453    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">set_menu_back()</A></EM></FONT>
454    <b>pragma</b> Inline (Set_Background);
455
456    <FONT COLOR=green><EM>--  #1A NAME="AFU_35"#2|</EM></FONT>
457    <b>procedure</b> Background (<FONT COLOR=red><A NAME="ref_452_26" HREF="terminal_interface-curses-menus__adb.htm#ref_606_26">Men</A></FONT>  : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
458                          Back : <b>out</b> Character_Attribute_Set);
459    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">menu_back()</A></EM></FONT>
460    <FONT COLOR=green><EM>--  #1A NAME="AFU_36"#2|</EM></FONT>
461
462    <b>procedure</b> Background (<FONT COLOR=red><A NAME="ref_457_26" HREF="terminal_interface-curses-menus__adb.htm#ref_615_26">Men</A></FONT>   : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
463                          <FONT COLOR=red><A NAME="ref_458_26" HREF="terminal_interface-curses-menus__adb.htm#ref_616_26">Back</A></FONT>  : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A>;
464                          Color : <b>out</b> Color_Pair);
465    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">menu_back()</A></EM></FONT>
466    <b>pragma</b> Inline (Background);
467
468    <FONT COLOR=green><EM>--  #1A NAME="AFU_37"#2|</EM></FONT>
469    <b>procedure</b> Set_Grey
470      (<FONT COLOR=red><A NAME="ref_465_7" HREF="terminal_interface-curses-menus__adb.htm#ref_626_24">Men</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
471       <FONT COLOR=red><A NAME="ref_466_7" HREF="terminal_interface-curses-menus__adb.htm#ref_627_24">Grey</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A> := Normal_Video;
472       Color : <b>in</b> Color_Pair := Color_Pair'First);
473    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">set_menu_grey()</A></EM></FONT>
474    <b>pragma</b> Inline (Set_Grey);
475
476    <FONT COLOR=green><EM>--  #1A NAME="AFU_38"#2|</EM></FONT>
477    <b>procedure</b> Grey (<FONT COLOR=red><A NAME="ref_472_20" HREF="terminal_interface-curses-menus__adb.htm#ref_645_20">Men</A></FONT>  : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
478                    Grey : <b>out</b> Character_Attribute_Set);
479    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">menu_grey()</A></EM></FONT>
480
481    <FONT COLOR=green><EM>--  #1A NAME="AFU_39"#2|</EM></FONT>
482    <b>procedure</b> Grey
483      (<FONT COLOR=red><A NAME="ref_478_7" HREF="terminal_interface-curses-menus__adb.htm#ref_654_20">Men</A></FONT>   : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_307_9">Menu</A>;
484       <FONT COLOR=red><A NAME="ref_479_7" HREF="terminal_interface-curses-menus__adb.htm#ref_655_20">Grey</A></FONT>  : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_299_9">Character_Attribute_Set</A>;
485       Color : <b>out</b> Color_Pair);
486    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">menu_grey()</A></EM></FONT>
487    <b>pragma</b> Inline (Grey);
488
489    <FONT COLOR=green><EM>--  #1A NAME="AFU_40"#2|</EM></FONT>
490    <b>procedure</b> Set_Pad_Character (<FONT COLOR=red><A NAME="ref_485_33" HREF="terminal_interface-curses-menus__adb.htm#ref_665_33">Men</A></FONT> : <b>in</b> Menu;
491                                 Pad : <b>in</b> Character := Space);
492    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">set_menu_pad()</A></EM></FONT>
493    <b>pragma</b> Inline (Set_Pad_Character);
494
495    <FONT COLOR=green><EM>--  #1A NAME="AFU_41"#2|</EM></FONT>
496    <b>procedure</b> Pad_Character (<FONT COLOR=red><A NAME="ref_491_29" HREF="terminal_interface-curses-menus__adb.htm#ref_680_29">Men</A></FONT> : <b>in</b>  Menu;
497                             Pad : <b>out</b> Character);
498    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_attribs.3x.html">menu_pad()</A></EM></FONT>
499    <b>pragma</b> Inline (Pad_Character);
500
501    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
502    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_spacing.3x.html">menu_spacing.3x</A></EM></FONT>
503    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
504
505    <FONT COLOR=green><EM>--  #1A NAME="AFU_42"#2|</EM></FONT>
506    <b>procedure</b> Set_Spacing (<FONT COLOR=red><A NAME="ref_501_27" HREF="terminal_interface-curses-menus__adb.htm#ref_689_27">Men</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Menu</A>;
507                           <FONT COLOR=red><A NAME="ref_502_27" HREF="terminal_interface-curses-menus__adb.htm#ref_690_27">Descr</A></FONT> : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A> := 0;
508                           <FONT COLOR=red><A NAME="ref_503_27" HREF="terminal_interface-curses-menus__adb.htm#ref_691_27">Row</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>   := 0;
509                           Col   : <b>in</b> Column_Position := 0);
510    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_spacing.3x.html">set_menu_spacing()</A></EM></FONT>
511    <b>pragma</b> Inline (Set_Spacing);
512
513    <FONT COLOR=green><EM>--  #1A NAME="AFU_43"#2|</EM></FONT>
514    <b>procedure</b> Spacing (<FONT COLOR=red><A NAME="ref_509_23" HREF="terminal_interface-curses-menus__adb.htm#ref_708_23">Men</A></FONT>   : <b>in</b> Menu;
515                       <FONT COLOR=red><A NAME="ref_510_23" HREF="terminal_interface-curses-menus__adb.htm#ref_709_23">Descr</A></FONT> : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</A>;
516                       <FONT COLOR=red><A NAME="ref_511_23" HREF="terminal_interface-curses-menus__adb.htm#ref_710_23">Row</A></FONT>   : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
517                       Col   : <b>out</b> Column_Position);
518    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_spacing.3x.html">menu_spacing()</A></EM></FONT>
519    <b>pragma</b> Inline (Spacing);
520
521    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
522    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_pattern.3x.html">menu_pattern.3x</A></EM></FONT>
523    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
524
525    <FONT COLOR=green><EM>--  #1A NAME="AFU_44"#2|</EM></FONT>
526    <b>function</b> Set_Pattern (<FONT COLOR=red><A NAME="ref_521_26" HREF="terminal_interface-curses-menus__adb.htm#ref_733_26">Men</A></FONT>  : Menu;
527                          Text : String) <b>return</b> Boolean;
528    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_pattern.3x.html">set_menu_pattern()</A></EM></FONT>
529    <FONT COLOR=green><EM>--  Return TRUE if the pattern matches, FALSE otherwise</EM></FONT>
530    <b>pragma</b> Inline (Set_Pattern);
531
532    <FONT COLOR=green><EM>--  #1A NAME="AFU_45"#2|</EM></FONT>
533    <b>procedure</b> Pattern (<FONT COLOR=red><A NAME="ref_528_23" HREF="terminal_interface-curses-menus__adb.htm#ref_756_23">Men</A></FONT>  : <b>in</b>  Menu;
534                       Text : <b>out</b> String);
535    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_pattern.3x.html">menu_pattern()</A></EM></FONT>
536    <b>pragma</b> Inline (Pattern);
537
538    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
539    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_format.3x.html">menu_format.3x</A></EM></FONT>
540    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
541
542    <FONT COLOR=green><EM>--  #1A NAME="AFU_46"#2|</EM></FONT>
543    <b>procedure</b> Set_Format (<FONT COLOR=red><A NAME="ref_538_26" HREF="terminal_interface-curses-menus__adb.htm#ref_765_26">Men</A></FONT>     : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Menu</A>;
544                          <FONT COLOR=red><A NAME="ref_539_26" HREF="terminal_interface-curses-menus__adb.htm#ref_766_26">Lines</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
545                          Columns : <b>in</b> Column_Count);
546    <FONT COLOR=green><EM>--  Not implemented: 0 argument for Lines or Columns;</EM></FONT>
547    <FONT COLOR=green><EM>--  instead use Format to get the current sizes</EM></FONT>
548    <FONT COLOR=green><EM>--      The  default  format  is  16  rows,  1  column.    Calling</EM></FONT>
549    <FONT COLOR=green><EM>--      set_menu_format  with a null menu pointer will change this</EM></FONT>
550    <FONT COLOR=green><EM>--      default.  A zero row or column argument to set_menu_format</EM></FONT>
551    <FONT COLOR=green><EM>--      is  interpreted  as  a  request  not to change the current</EM></FONT>
552    <FONT COLOR=green><EM>--      value.</EM></FONT>
553    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_format.3x.html">set_menu_format()</A></EM></FONT>
554    <b>pragma</b> Inline (Set_Format);
555
556    <FONT COLOR=green><EM>--  #1A NAME="AFU_47"#2|</EM></FONT>
557    <b>procedure</b> Format (<FONT COLOR=red><A NAME="ref_552_22" HREF="terminal_interface-curses-menus__adb.htm#ref_783_22">Men</A></FONT>     : <b>in</b>  <A HREF="terminal_interface-curses__ads.htm#ref_63_12">Menu</A>;
558                      <FONT COLOR=red><A NAME="ref_553_22" HREF="terminal_interface-curses-menus__adb.htm#ref_784_22">Lines</A></FONT>   : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
559                      Columns : <b>out</b> Column_Count);
560    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_format.3x.html">menu_format()</A></EM></FONT>
561    <b>pragma</b> Inline (Format);
562
563    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
564    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_hook.3x.html">menu_hook.3x</A></EM></FONT>
565    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
566
567    <b>type</b> Menu_Hook_Function <b>is</b> <b>access</b> <b>procedure</b> (Men : <b>in</b> Menu);
568    <b>pragma</b> Convention (C, Menu_Hook_Function);
569
570    <FONT COLOR=green><EM>--  #1A NAME="AFU_48"#2|</EM></FONT>
571    <b>procedure</b> Set_Item_Init_Hook (<FONT COLOR=red><A NAME="ref_566_34" HREF="terminal_interface-curses-menus__adb.htm#ref_803_34">Men</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_561_9">Menu</A>;
572                                  Proc : <b>in</b> Menu_Hook_Function);
573    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_hook.3x.html">set_item_init()</A></EM></FONT>
574    <b>pragma</b> Inline (Set_Item_Init_Hook);
575
576    <FONT COLOR=green><EM>--  #1A NAME="AFU_49"#2|</EM></FONT>
577    <b>procedure</b> Set_Item_Term_Hook (<FONT COLOR=red><A NAME="ref_572_34" HREF="terminal_interface-curses-menus__adb.htm#ref_817_34">Men</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_561_9">Menu</A>;
578                                  Proc : <b>in</b> Menu_Hook_Function);
579    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_hook.3x.html">set_item_term()</A></EM></FONT>
580    <b>pragma</b> Inline (Set_Item_Term_Hook);
581
582    <FONT COLOR=green><EM>--  #1A NAME="AFU_50"#2|</EM></FONT>
583    <b>procedure</b> Set_Menu_Init_Hook (<FONT COLOR=red><A NAME="ref_578_34" HREF="terminal_interface-curses-menus__adb.htm#ref_831_34">Men</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_561_9">Menu</A>;
584                                  Proc : <b>in</b> Menu_Hook_Function);
585    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_hook.3x.html">set_menu_init()</A></EM></FONT>
586    <b>pragma</b> Inline (Set_Menu_Init_Hook);
587
588    <FONT COLOR=green><EM>--  #1A NAME="AFU_51"#2|</EM></FONT>
589    <b>procedure</b> Set_Menu_Term_Hook (<FONT COLOR=red><A NAME="ref_584_34" HREF="terminal_interface-curses-menus__adb.htm#ref_845_34">Men</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_561_9">Menu</A>;
590                                  Proc : <b>in</b> Menu_Hook_Function);
591    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_hook.3x.html">set_menu_term()</A></EM></FONT>
592    <b>pragma</b> Inline (Set_Menu_Term_Hook);
593
594    <FONT COLOR=green><EM>--  #1A NAME="AFU_52"#2|</EM></FONT>
595    <b>function</b> Get_Item_Init_Hook (Men : Menu) <b>return</b> Menu_Hook_Function;
596    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_hook.3x.html">item_init()</A></EM></FONT>
597    <b>pragma</b> Inline (Get_Item_Init_Hook);
598
599    <FONT COLOR=green><EM>--  #1A NAME="AFU_53"#2|</EM></FONT>
600    <b>function</b> Get_Item_Term_Hook (Men : Menu) <b>return</b> Menu_Hook_Function;
601    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_hook.3x.html">item_term()</A></EM></FONT>
602    <b>pragma</b> Inline (Get_Item_Term_Hook);
603
604    <FONT COLOR=green><EM>--  #1A NAME="AFU_54"#2|</EM></FONT>
605    <b>function</b> Get_Menu_Init_Hook (Men : Menu) <b>return</b> Menu_Hook_Function;
606    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_hook.3x.html">menu_init()</A></EM></FONT>
607    <b>pragma</b> Inline (Get_Menu_Init_Hook);
608
609    <FONT COLOR=green><EM>--  #1A NAME="AFU_55"#2|</EM></FONT>
610    <b>function</b> Get_Menu_Term_Hook (Men : Menu) <b>return</b> Menu_Hook_Function;
611    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_hook.3x.html">menu_term()</A></EM></FONT>
612    <b>pragma</b> Inline (Get_Menu_Term_Hook);
613
614    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
615    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_items.3x.html">menu_items.3x</A></EM></FONT>
616    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
617
618    <FONT COLOR=green><EM>--  #1A NAME="AFU_56"#2|</EM></FONT>
619    <b>procedure</b> Redefine (<FONT COLOR=red><A NAME="ref_614_24" HREF="terminal_interface-curses-menus__adb.htm#ref_891_24">Men</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_178_9">Menu</A>;
620                        Items : <b>in</b> Item_Array_Access);
621    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_items.3x.html">set_menu_items()</A></EM></FONT>
622    <b>pragma</b> Inline (Redefine);
623
624    <b>procedure</b> Set_Items (<FONT COLOR=red><A NAME="ref_619_25">Men</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_178_9">Menu</A>;
625                         Items : <b>in</b> Item_Array_Access) <b>renames</b> Redefine;
626    <FONT COLOR=green><EM>--  pragma Inline (Set_Items);</EM></FONT>
627
628    <FONT COLOR=green><EM>--  #1A NAME="AFU_57"#2|</EM></FONT>
629    <b>function</b> Items (<FONT COLOR=red><A NAME="ref_624_20" HREF="terminal_interface-curses-menus__adb.htm#ref_919_20">Men</A></FONT>   : Menu;
630                    Index : Positive) <b>return</b> Item;
631    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_items.3x.html">menu_items()</A></EM></FONT>
632    <b>pragma</b> Inline (Items);
633
634    <FONT COLOR=green><EM>--  #1A NAME="AFU_58"#2|</EM></FONT>
635    <b>function</b> Item_Count (Men : Menu) <b>return</b> Natural;
636    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_items.3x.html">item_count()</A></EM></FONT>
637    <b>pragma</b> Inline (Item_Count);
638
639    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
640    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_new.3x.html">menu_new.3x</A></EM></FONT>
641    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
642
643    <FONT COLOR=green><EM>--  #1A NAME="AFU_59"#2|</EM></FONT>
644    <b>function</b> Create (Items : Item_Array_Access) <b>return</b> Menu;
645    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_new.3x.html">new_menu()</A></EM></FONT>
646    <FONT COLOR=green><EM>--  Not inlined</EM></FONT>
647
648    <b>function</b> New_Menu (Items : Item_Array_Access) <b>return</b> Menu <b>renames</b> Create;
649
650    <FONT COLOR=green><EM>--  #1A NAME="AFU_60"#2|</EM></FONT>
651    <b>procedure</b> Delete (Men : <b>in</b> <b>out</b> Menu);
652    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_new.3x.html">free_menu()</A></EM></FONT>
653    <FONT COLOR=green><EM>--  Reset Men to Null_Menu</EM></FONT>
654    <FONT COLOR=green><EM>--  Not inlined</EM></FONT>
655
656    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
657    <FONT COLOR=green><EM>--  | Man page <A HREF="../man/menu_driver.3x.html">menu_driver.3x</A></EM></FONT>
658    <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
659
660    <b>type</b> Driver_Result <b>is</b> (<FONT COLOR=red><A NAME="ref_655_27">Menu_Ok</A></FONT>,
661                           <FONT COLOR=red><A NAME="ref_656_27">Request_Denied</A></FONT>,
662                           <FONT COLOR=red><A NAME="ref_657_27">Unknown_Request</A></FONT>,
663                           No_Match);
664
665    <FONT COLOR=green><EM>--  #1A NAME="AFU_61"#2|</EM></FONT>
666    <b>function</b> Driver (<FONT COLOR=red><A NAME="ref_661_21" HREF="terminal_interface-curses-menus__adb.htm#ref_971_21">Men</A></FONT> : <A HREF="terminal_interface-curses__ads.htm#ref_68_9">Menu</A>;
667                     Key : Key_Code) <b>return</b> Driver_Result;
668    <FONT COLOR=green><EM>--  AKA: <A HREF="../man/menu_driver.3x.html">menu_driver()</A></EM></FONT>
669    <FONT COLOR=green><EM>--  Driver is not inlined</EM></FONT>
670
671    <FONT COLOR=green><EM>--  #1A NAME="AFU_62"#2|</EM></FONT>
672    <FONT COLOR=green><EM>--  Not Implemented: menu_request_name, menu_request_by_name</EM></FONT>
673 <FONT COLOR=green><EM>-------------------------------------------------------------------------------</EM></FONT>
674 <b>private</b>
675    <b>type</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_57_9">Item</A>   <b>is</b> <b>new</b> System.Storage_Elements.Integer_Address;
676    <b>type</b> Menu   <b>is</b> <b>new</b> System.Storage_Elements.Integer_Address;
677
678    <A HREF="terminal_interface-curses-menus__ads.htm#ref_63_4">Null_Item</A> : <b>constant</b> <A HREF="terminal_interface-curses-menus__ads.htm#ref_57_9">Item</A> := 0;
679    Null_Menu : <b>constant</b> Menu := 0;
680
681 <b>end</b> Terminal_Interface.Curses.Menus;
682 </PRE></BODY></HTML>