1<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01//EN"> 2<html> 3<head> 4<title>terminal_interface-curses-forms.ads</title> 5<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"> 6<style type="text/css"> 7*.comment { 8 color: green; 9} 10*.symbol { 11 color: red; 12} 13</style> 14</head> 15<body> 16<hr><div style="text-align:center"><h1> File : terminal_interface-curses-forms.ads </h1></div><hr> 17<pre> 18<span class="comment"><em>------------------------------------------------------------------------------</em></span> 19<span class="comment"><em>-- --</em></span> 20<span class="comment"><em>-- <strong>GNAT</strong> ncurses Binding --</em></span> 21<span class="comment"><em>-- --</em></span> 22<span class="comment"><em>-- Terminal_Interface.Curses.Form --</em></span> 23<span class="comment"><em>-- --</em></span> 24<span class="comment"><em>-- S P E C --</em></span> 25<span class="comment"><em>-- --</em></span> 26<span class="comment"><em>------------------------------------------------------------------------------</em></span> 27<span class="comment"><em>-- Copyright 2020 Thomas E. Dickey --</em></span> 28<span class="comment"><em>-- Copyright 1998-2009,2014 Free Software Foundation, Inc. --</em></span> 29<span class="comment"><em>-- --</em></span> 30<span class="comment"><em>-- Permission is hereby granted, free of charge, to any person obtaining a --</em></span> 31<span class="comment"><em>-- copy of this software and associated documentation files (the --</em></span> 32<span class="comment"><em>-- "Software"), to deal in the Software without restriction, including --</em></span> 33<span class="comment"><em>-- without limitation the rights to use, copy, modify, merge, publish, --</em></span> 34<span class="comment"><em>-- distribute, distribute with modifications, sublicense, and/or sell --</em></span> 35<span class="comment"><em>-- copies of the Software, and to permit persons to whom the Software is --</em></span> 36<span class="comment"><em>-- furnished to do so, subject to the following conditions: --</em></span> 37<span class="comment"><em>-- --</em></span> 38<span class="comment"><em>-- The above copyright notice and this permission notice shall be included --</em></span> 39<span class="comment"><em>-- in all copies or substantial portions of the Software. --</em></span> 40<span class="comment"><em>-- --</em></span> 41<span class="comment"><em>-- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS --</em></span> 42<span class="comment"><em>-- OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF --</em></span> 43<span class="comment"><em>-- MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. --</em></span> 44<span class="comment"><em>-- IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, --</em></span> 45<span class="comment"><em>-- DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR --</em></span> 46<span class="comment"><em>-- OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR --</em></span> 47<span class="comment"><em>-- THE USE OR OTHER DEALINGS IN THE SOFTWARE. --</em></span> 48<span class="comment"><em>-- --</em></span> 49<span class="comment"><em>-- Except as contained in this notice, the name(s) of the above copyright --</em></span> 50<span class="comment"><em>-- holders shall not be used in advertising or otherwise to promote the --</em></span> 51<span class="comment"><em>-- sale, use or other dealings in this Software without prior written --</em></span> 52<span class="comment"><em>-- authorization. --</em></span> 53<span class="comment"><em>------------------------------------------------------------------------------</em></span> 54<span class="comment"><em>-- Author: Juergen Pfeifer, 1996</em></span> 55<span class="comment"><em>-- Version Control:</em></span> 56<span class="comment"><em>-- @Revision: 1.34 @</em></span> 57<span class="comment"><em>-- @Date: 2020/02/02 23:34:34 @</em></span> 58<span class="comment"><em>-- Binding Version 01.00</em></span> 59<span class="comment"><em>------------------------------------------------------------------------------</em></span> 60<b>with</b> System; 61<b>with</b> Ada.Characters.Latin_1; 62 63<b>package</b> <a href="terminal_interface__ads.htm#ref_43_9">Terminal_Interface</a>.<a href="terminal_interface-curses__ads.htm#ref_48_28">Curses</a>.<span class="symbol"><a name="ref_46_35" href="terminal_interface-curses-forms__adb.htm#ref_51_40">Forms</a></span> <b>is</b> 64 <b>pragma</b> Preelaborate (<a href="terminal_interface__ads.htm#ref_43_9">Terminal_Interface</a>.<a href="terminal_interface-curses__ads.htm#ref_48_28">Curses</a>.<a href="terminal_interface-curses-forms__ads.htm#ref_46_35">Forms</a>); 65 <b>pragma</b> Linker_Options ("-lform" & <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_9_4">DFT_ARG_SUFFIX</a>); 66 67 Space : Character <b>renames</b> Ada.Characters.Latin_1.Space; 68 69 <b>type</b> <span class="symbol"><a name="ref_52_9">Field</a></span> <b>is</b> <b>private</b>; 70 <b>type</b> <span class="symbol"><a name="ref_53_9">Form</a></span> <b>is</b> <b>private</b>; 71 72 <span class="symbol"><a name="ref_55_4">Null_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 73 <span class="symbol"><a name="ref_56_4">Null_Form</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 74 75 <b>type</b> <span class="symbol"><a name="ref_58_9">Field_Justification</a></span> <b>is</b> (<span class="symbol"><a name="ref_58_33">None</a></span>, 76 <span class="symbol"><a name="ref_59_33">Left</a></span>, 77 <span class="symbol"><a name="ref_60_33">Center</a></span>, 78 <span class="symbol"><a name="ref_61_33">Right</a></span>); 79 80 <b>type</b> <span class="symbol"><a name="ref_63_9">Field_Option_Set</a></span> <b>is</b> 81 <b>record</b> 82 <span class="symbol"><a name="ref_65_10">Visible</a></span> : Boolean; 83 <span class="symbol"><a name="ref_66_10">Active</a></span> : Boolean; 84 <span class="symbol"><a name="ref_67_10">Public</a></span> : Boolean; 85 <span class="symbol"><a name="ref_68_10">Edit</a></span> : Boolean; 86 <span class="symbol"><a name="ref_69_10">Wrap</a></span> : Boolean; 87 <span class="symbol"><a name="ref_70_10">Blank</a></span> : Boolean; 88 <span class="symbol"><a name="ref_71_10">Auto_Skip</a></span> : Boolean; 89 <span class="symbol"><a name="ref_72_10">Null_Ok</a></span> : Boolean; 90 <span class="symbol"><a name="ref_73_10">Pass_Ok</a></span> : Boolean; 91 <span class="symbol"><a name="ref_74_10">Static</a></span> : Boolean; 92 <b>end</b> <b>record</b>; 93 <b>pragma</b> Convention (C_Pass_By_Copy, <a href="terminal_interface-curses-forms__ads.htm#ref_63_9">Field_Option_Set</a>); 94 95 <b>for</b> <a href="terminal_interface-curses-forms__ads.htm#ref_63_9">Field_Option_Set</a> <b>use</b> 96 <b>record</b> 97 <a href="terminal_interface-curses-forms__ads.htm#ref_65_10">Visible</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_279_4">O_VISIBLE_First</a> 98 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_280_4">O_VISIBLE_Last</a>; 99 <a href="terminal_interface-curses-forms__ads.htm#ref_66_10">Active</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_281_4">O_ACTIVE_First</a> 100 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_282_4">O_ACTIVE_Last</a>; 101 <a href="terminal_interface-curses-forms__ads.htm#ref_67_10">Public</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_283_4">O_PUBLIC_First</a> 102 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_284_4">O_PUBLIC_Last</a>; 103 <a href="terminal_interface-curses-forms__ads.htm#ref_68_10">Edit</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_285_4">O_EDIT_First</a> 104 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_286_4">O_EDIT_Last</a>; 105 <a href="terminal_interface-curses-forms__ads.htm#ref_69_10">Wrap</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_287_4">O_WRAP_First</a> 106 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_288_4">O_WRAP_Last</a>; 107 <a href="terminal_interface-curses-forms__ads.htm#ref_70_10">Blank</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_289_4">O_BLANK_First</a> 108 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_290_4">O_BLANK_Last</a>; 109 <a href="terminal_interface-curses-forms__ads.htm#ref_71_10">Auto_Skip</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_291_4">O_AUTOSKIP_First</a> 110 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_292_4">O_AUTOSKIP_Last</a>; 111 <a href="terminal_interface-curses-forms__ads.htm#ref_72_10">Null_Ok</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_293_4">O_NULLOK_First</a> 112 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_294_4">O_NULLOK_Last</a>; 113 <a href="terminal_interface-curses-forms__ads.htm#ref_73_10">Pass_Ok</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_295_4">O_PASSOK_First</a> 114 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_296_4">O_PASSOK_Last</a>; 115 <a href="terminal_interface-curses-forms__ads.htm#ref_74_10">Static</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_297_4">O_STATIC_First</a> 116 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_298_4">O_STATIC_Last</a>; 117 <b>end</b> <b>record</b>; 118 <b>pragma</b> Warnings (Off); 119 <b>for</b> <a href="terminal_interface-curses-forms__ads.htm#ref_63_9">Field_Option_Set</a>'Size <b>use</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_299_4">Field_Options_Size</a>; 120 <b>pragma</b> Warnings (On); 121 122 <b>function</b> <span class="symbol"><a name="ref_105_13" href="terminal_interface-curses-forms__adb.htm#ref_1020_13">Default_Field_Options</a></span> <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_63_9">Field_Option_Set</a>; 123 <span class="comment"><em>-- The initial defaults for the field options.</em></span> 124 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_105_13">Default_Field_Options</a>); 125 126 <b>type</b> <span class="symbol"><a name="ref_109_9">Form_Option_Set</a></span> <b>is</b> 127 <b>record</b> 128 <span class="symbol"><a name="ref_111_10">NL_Overload</a></span> : Boolean; 129 <span class="symbol"><a name="ref_112_10">BS_Overload</a></span> : Boolean; 130 <b>end</b> <b>record</b>; 131 <b>pragma</b> Convention (C_Pass_By_Copy, <a href="terminal_interface-curses-forms__ads.htm#ref_109_9">Form_Option_Set</a>); 132 133 <b>for</b> <a href="terminal_interface-curses-forms__ads.htm#ref_109_9">Form_Option_Set</a> <b>use</b> 134 <b>record</b> 135 <a href="terminal_interface-curses-forms__ads.htm#ref_111_10">NL_Overload</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_303_4">O_NL_OVERLOAD_First</a> 136 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_304_4">O_NL_OVERLOAD_Last</a>; 137 <a href="terminal_interface-curses-forms__ads.htm#ref_112_10">BS_Overload</a> <b>at</b> 0 <b>range</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_305_4">O_BS_OVERLOAD_First</a> 138 .. <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_306_4">O_BS_OVERLOAD_Last</a>; 139 <b>end</b> <b>record</b>; 140 <b>pragma</b> Warnings (Off); 141 <b>for</b> <a href="terminal_interface-curses-forms__ads.htm#ref_109_9">Form_Option_Set</a>'Size <b>use</b> <a href="terminal_interface-curses_constants__ads.htm#ref_6_28">Curses_Constants</a>.<a href="terminal_interface-curses_constants__ads.htm#ref_299_4">Field_Options_Size</a>; 142 <b>pragma</b> Warnings (On); 143 144 <b>function</b> <span class="symbol"><a name="ref_127_13" href="terminal_interface-curses-forms__adb.htm#ref_1026_13">Default_Form_Options</a></span> <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_109_9">Form_Option_Set</a>; 145 <span class="comment"><em>-- The initial defaults for the form options.</em></span> 146 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_127_13">Default_Form_Options</a>); 147 148 <b>type</b> <span class="symbol"><a name="ref_131_9">Buffer_Number</a></span> <b>is</b> <b>new</b> Natural; 149 150 <b>type</b> Field_Array <b>is</b> <b>array</b> (Positive <b>range</b> <>) <b>of</b> <b>aliased</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 151 <b>pragma</b> Convention (C, Field_Array); 152 153 <b>type</b> <span class="symbol"><a name="ref_136_9">Field_Array_Access</a></span> <b>is</b> <b>access</b> Field_Array; 154 155 <b>procedure</b> <span class="symbol"><a name="ref_138_14" href="terminal_interface-curses-forms__adb.htm#ref_1002_14">Free</a></span> (<span class="symbol"><a name="ref_138_20" href="terminal_interface-curses-forms__adb.htm#ref_1002_20">FA</a></span> : <b>in</b> <b>out</b> <a href="terminal_interface-curses-forms__ads.htm#ref_136_9">Field_Array_Access</a>; 156 <span class="symbol"><a name="ref_139_20" href="terminal_interface-curses-forms__adb.htm#ref_1003_20">Free_Fields</a></span> : Boolean := False); 157 <span class="comment"><em>-- Release the memory for an allocated field array</em></span> 158 <span class="comment"><em>-- If Free_Fields is True, call Delete() for all the fields in</em></span> 159 <span class="comment"><em>-- the array.</em></span> 160 161 <b>subtype</b> <span class="symbol"><a name="ref_144_12">Form_Request_Code</a></span> <b>is</b> <a href="terminal_interface-curses__ads.htm#ref_67_9">Key_Code</a> <b>range</b> (<a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 1) .. (<a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 57); 162 163 <span class="comment"><em>-- The prefix F_ stands for "Form Request"</em></span> 164 <span class="symbol"><a name="ref_147_4">F_Next_Page</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 1; 165 <span class="symbol"><a name="ref_148_4">F_Previous_Page</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 2; 166 <span class="symbol"><a name="ref_149_4">F_First_Page</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 3; 167 <span class="symbol"><a name="ref_150_4">F_Last_Page</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 4; 168 169 <span class="symbol"><a name="ref_152_4">F_Next_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 5; 170 <span class="symbol"><a name="ref_153_4">F_Previous_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 6; 171 <span class="symbol"><a name="ref_154_4">F_First_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 7; 172 <span class="symbol"><a name="ref_155_4">F_Last_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 8; 173 <span class="symbol"><a name="ref_156_4">F_Sorted_Next_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 9; 174 <span class="symbol"><a name="ref_157_4">F_Sorted_Previous_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 10; 175 <span class="symbol"><a name="ref_158_4">F_Sorted_First_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 11; 176 <span class="symbol"><a name="ref_159_4">F_Sorted_Last_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 12; 177 <span class="symbol"><a name="ref_160_4">F_Left_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 13; 178 <span class="symbol"><a name="ref_161_4">F_Right_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 14; 179 <span class="symbol"><a name="ref_162_4">F_Up_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 15; 180 <span class="symbol"><a name="ref_163_4">F_Down_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 16; 181 182 <span class="symbol"><a name="ref_165_4">F_Next_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 17; 183 <span class="symbol"><a name="ref_166_4">F_Previous_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 18; 184 <span class="symbol"><a name="ref_167_4">F_Next_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 19; 185 <span class="symbol"><a name="ref_168_4">F_Previous_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 20; 186 <span class="symbol"><a name="ref_169_4">F_Next_Word</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 21; 187 <span class="symbol"><a name="ref_170_4">F_Previous_Word</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 22; 188 <span class="symbol"><a name="ref_171_4">F_Begin_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 23; 189 <span class="symbol"><a name="ref_172_4">F_End_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 24; 190 <span class="symbol"><a name="ref_173_4">F_Begin_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 25; 191 <span class="symbol"><a name="ref_174_4">F_End_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 26; 192 <span class="symbol"><a name="ref_175_4">F_Left_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 27; 193 <span class="symbol"><a name="ref_176_4">F_Right_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 28; 194 <span class="symbol"><a name="ref_177_4">F_Up_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 29; 195 <span class="symbol"><a name="ref_178_4">F_Down_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 30; 196 197 <span class="symbol"><a name="ref_180_4">F_New_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 31; 198 <span class="symbol"><a name="ref_181_4">F_Insert_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 32; 199 <span class="symbol"><a name="ref_182_4">F_Insert_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 33; 200 <span class="symbol"><a name="ref_183_4">F_Delete_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 34; 201 <span class="symbol"><a name="ref_184_4">F_Delete_Previous</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 35; 202 <span class="symbol"><a name="ref_185_4">F_Delete_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 36; 203 <span class="symbol"><a name="ref_186_4">F_Delete_Word</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 37; 204 <span class="symbol"><a name="ref_187_4">F_Clear_EOL</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 38; 205 <span class="symbol"><a name="ref_188_4">F_Clear_EOF</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 39; 206 <span class="symbol"><a name="ref_189_4">F_Clear_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 40; 207 <span class="symbol"><a name="ref_190_4">F_Overlay_Mode</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 41; 208 <span class="symbol"><a name="ref_191_4">F_Insert_Mode</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 42; 209 210 <span class="comment"><em>-- Vertical Scrolling</em></span> 211 <span class="symbol"><a name="ref_194_4">F_ScrollForward_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 43; 212 <span class="symbol"><a name="ref_195_4">F_ScrollBackward_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 44; 213 <span class="symbol"><a name="ref_196_4">F_ScrollForward_Page</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 45; 214 <span class="symbol"><a name="ref_197_4">F_ScrollBackward_Page</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 46; 215 <span class="symbol"><a name="ref_198_4">F_ScrollForward_HalfPage</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 47; 216 <span class="symbol"><a name="ref_199_4">F_ScrollBackward_HalfPage</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 48; 217 218 <span class="comment"><em>-- Horizontal Scrolling</em></span> 219 <span class="symbol"><a name="ref_202_4">F_HScrollForward_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 49; 220 <span class="symbol"><a name="ref_203_4">F_HScrollBackward_Char</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 50; 221 <span class="symbol"><a name="ref_204_4">F_HScrollForward_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 51; 222 <span class="symbol"><a name="ref_205_4">F_HScrollBackward_Line</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 52; 223 <span class="symbol"><a name="ref_206_4">F_HScrollForward_HalfLine</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 53; 224 <span class="symbol"><a name="ref_207_4">F_HScrollBackward_HalfLine</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 54; 225 226 <span class="symbol"><a name="ref_209_4">F_Validate_Field</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 55; 227 <span class="symbol"><a name="ref_210_4">F_Next_Choice</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 56; 228 <span class="symbol"><a name="ref_211_4">F_Previous_Choice</a></span> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> := <a href="terminal_interface-curses__ads.htm#ref_380_4">Key_Max</a> + 57; 229 230 <span class="comment"><em>-- For those who like the old 'C' style request names</em></span> 231 REQ_NEXT_PAGE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_147_4">F_Next_Page</a>; 232 REQ_PREV_PAGE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_148_4">F_Previous_Page</a>; 233 REQ_FIRST_PAGE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_149_4">F_First_Page</a>; 234 REQ_LAST_PAGE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_150_4">F_Last_Page</a>; 235 236 REQ_NEXT_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_152_4">F_Next_Field</a>; 237 REQ_PREV_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_153_4">F_Previous_Field</a>; 238 REQ_FIRST_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_154_4">F_First_Field</a>; 239 REQ_LAST_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_155_4">F_Last_Field</a>; 240 REQ_SNEXT_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_156_4">F_Sorted_Next_Field</a>; 241 REQ_SPREV_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_157_4">F_Sorted_Previous_Field</a>; 242 REQ_SFIRST_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_158_4">F_Sorted_First_Field</a>; 243 REQ_SLAST_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_159_4">F_Sorted_Last_Field</a>; 244 REQ_LEFT_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_160_4">F_Left_Field</a>; 245 REQ_RIGHT_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_161_4">F_Right_Field</a>; 246 REQ_UP_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_162_4">F_Up_Field</a>; 247 REQ_DOWN_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_163_4">F_Down_Field</a>; 248 249 REQ_NEXT_CHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_165_4">F_Next_Char</a>; 250 REQ_PREV_CHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_166_4">F_Previous_Char</a>; 251 REQ_NEXT_LINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_167_4">F_Next_Line</a>; 252 REQ_PREV_LINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_168_4">F_Previous_Line</a>; 253 REQ_NEXT_WORD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_169_4">F_Next_Word</a>; 254 REQ_PREV_WORD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_170_4">F_Previous_Word</a>; 255 REQ_BEG_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_171_4">F_Begin_Field</a>; 256 REQ_END_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_172_4">F_End_Field</a>; 257 REQ_BEG_LINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_173_4">F_Begin_Line</a>; 258 REQ_END_LINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_174_4">F_End_Line</a>; 259 REQ_LEFT_CHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_175_4">F_Left_Char</a>; 260 REQ_RIGHT_CHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_176_4">F_Right_Char</a>; 261 REQ_UP_CHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_177_4">F_Up_Char</a>; 262 REQ_DOWN_CHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_178_4">F_Down_Char</a>; 263 264 REQ_NEW_LINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_180_4">F_New_Line</a>; 265 REQ_INS_CHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_181_4">F_Insert_Char</a>; 266 REQ_INS_LINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_182_4">F_Insert_Line</a>; 267 REQ_DEL_CHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_183_4">F_Delete_Char</a>; 268 REQ_DEL_PREV : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_184_4">F_Delete_Previous</a>; 269 REQ_DEL_LINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_185_4">F_Delete_Line</a>; 270 REQ_DEL_WORD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_186_4">F_Delete_Word</a>; 271 REQ_CLR_EOL : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_187_4">F_Clear_EOL</a>; 272 REQ_CLR_EOF : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_188_4">F_Clear_EOF</a>; 273 REQ_CLR_FIELD : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_189_4">F_Clear_Field</a>; 274 REQ_OVL_MODE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_190_4">F_Overlay_Mode</a>; 275 REQ_INS_MODE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_191_4">F_Insert_Mode</a>; 276 277 REQ_SCR_FLINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_194_4">F_ScrollForward_Line</a>; 278 REQ_SCR_BLINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_195_4">F_ScrollBackward_Line</a>; 279 REQ_SCR_FPAGE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_196_4">F_ScrollForward_Page</a>; 280 REQ_SCR_BPAGE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_197_4">F_ScrollBackward_Page</a>; 281 REQ_SCR_FHPAGE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_198_4">F_ScrollForward_HalfPage</a>; 282 REQ_SCR_BHPAGE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_199_4">F_ScrollBackward_HalfPage</a>; 283 284 REQ_SCR_FCHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_202_4">F_HScrollForward_Char</a>; 285 REQ_SCR_BCHAR : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_203_4">F_HScrollBackward_Char</a>; 286 REQ_SCR_HFLINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_204_4">F_HScrollForward_Line</a>; 287 REQ_SCR_HBLINE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_205_4">F_HScrollBackward_Line</a>; 288 REQ_SCR_HFHALF : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_206_4">F_HScrollForward_HalfLine</a>; 289 REQ_SCR_HBHALF : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_207_4">F_HScrollBackward_HalfLine</a>; 290 291 REQ_VALIDATION : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_209_4">F_Validate_Field</a>; 292 REQ_NEXT_CHOICE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_210_4">F_Next_Choice</a>; 293 REQ_PREV_CHOICE : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_211_4">F_Previous_Choice</a>; 294 295 <b>procedure</b> <span class="symbol"><a name="ref_278_14" href="terminal_interface-curses-forms__adb.htm#ref_65_14">Request_Name</a></span> (<span class="symbol"><a name="ref_278_28" href="terminal_interface-curses-forms__adb.htm#ref_65_28">Key</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a>; 296 <span class="symbol"><a name="ref_279_28" href="terminal_interface-curses-forms__adb.htm#ref_66_33">Name</a></span> : <b>out</b> String); 297 298 <b>function</b> <span class="symbol"><a name="ref_281_14" href="terminal_interface-curses-forms__adb.htm#ref_74_13">Request_Name</a></span> (<span class="symbol"><a name="ref_281_28" href="terminal_interface-curses-forms__adb.htm#ref_74_27">Key</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_144_12">Form_Request_Code</a>) <b>return</b> String; 299 <span class="comment"><em>-- Same as function</em></span> 300 <b>pragma</b> Inline (Request_Name); 301 302 <span class="comment"><em>------------------</em></span> 303 <span class="comment"><em>-- Exceptions --</em></span> 304 <span class="comment"><em>------------------</em></span> 305 <span class="symbol"><a name="ref_288_4">Form_Exception</a></span> : <b>exception</b>; 306 307 <span class="comment"><em>-- |=====================================================================</em></span> 308 <span class="comment"><em>-- | Man page <A HREF="../man/form_field_new.3x.html">form_field_new.3x</A></em></span> 309 <span class="comment"><em>-- |=====================================================================</em></span> 310 311 <span class="comment"><em>-- <A NAME="AFU_1">|</A></em></span> 312 <b>function</b> <span class="symbol"><a name="ref_295_13" href="terminal_interface-curses-forms__adb.htm#ref_92_13">Create</a></span> (<span class="symbol"><a name="ref_295_21" href="terminal_interface-curses-forms__adb.htm#ref_92_21">Height</a></span> : <a href="terminal_interface-curses__ads.htm#ref_62_12">Line_Count</a>; 313 <span class="symbol"><a name="ref_296_21" href="terminal_interface-curses-forms__adb.htm#ref_93_21">Width</a></span> : <a href="terminal_interface-curses__ads.htm#ref_64_12">Column_Count</a>; 314 <span class="symbol"><a name="ref_297_21" href="terminal_interface-curses-forms__adb.htm#ref_94_21">Top</a></span> : <a href="terminal_interface-curses__ads.htm#ref_59_9">Line_Position</a>; 315 <span class="symbol"><a name="ref_298_21" href="terminal_interface-curses-forms__adb.htm#ref_95_21">Left</a></span> : <a href="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</a>; 316 <span class="symbol"><a name="ref_299_21" href="terminal_interface-curses-forms__adb.htm#ref_96_21">Off_Screen</a></span> : Natural := 0; 317 <span class="symbol"><a name="ref_300_21" href="terminal_interface-curses-forms__adb.htm#ref_97_21">More_Buffers</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a>'First) 318 <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 319 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_new.3x.html">new_field()</A></em></span> 320 <span class="comment"><em>-- An overloaded Create is defined later. Pragma Inline appears there.</em></span> 321 322 <span class="comment"><em>-- <A NAME="AFU_2">|</A></em></span> 323 <b>function</b> New_Field (<span class="symbol"><a name="ref_306_24">Height</a></span> : <a href="terminal_interface-curses__ads.htm#ref_62_12">Line_Count</a>; 324 <span class="symbol"><a name="ref_307_24">Width</a></span> : <a href="terminal_interface-curses__ads.htm#ref_64_12">Column_Count</a>; 325 <span class="symbol"><a name="ref_308_24">Top</a></span> : <a href="terminal_interface-curses__ads.htm#ref_59_9">Line_Position</a>; 326 <span class="symbol"><a name="ref_309_24">Left</a></span> : <a href="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</a>; 327 <span class="symbol"><a name="ref_310_24">Off_Screen</a></span> : Natural := 0; 328 <span class="symbol"><a name="ref_311_24">More_Buffers</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a>'First) 329 <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a> <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_295_13">Create</a>; 330 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_new.3x.html">new_field()</A></em></span> 331 <b>pragma</b> Inline (New_Field); 332 333 <span class="comment"><em>-- <A NAME="AFU_3">|</A></em></span> 334 <b>procedure</b> <span class="symbol"><a name="ref_317_14" href="terminal_interface-curses-forms__adb.htm#ref_115_14">Delete</a></span> (<span class="symbol"><a name="ref_317_22" href="terminal_interface-curses-forms__adb.htm#ref_115_22">Fld</a></span> : <b>in</b> <b>out</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>); 335 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_new.3x.html">free_field()</A></em></span> 336 <span class="comment"><em>-- Reset Fld to Null_Field</em></span> 337 <span class="comment"><em>-- An overloaded Delete is defined later. Pragma Inline appears there.</em></span> 338 339 <span class="comment"><em>-- <A NAME="AFU_4">|</A></em></span> 340 <b>function</b> <span class="symbol"><a name="ref_323_13" href="terminal_interface-curses-forms__adb.htm#ref_127_13">Duplicate</a></span> (<span class="symbol"><a name="ref_323_24" href="terminal_interface-curses-forms__adb.htm#ref_127_24">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 341 <span class="symbol"><a name="ref_324_24" href="terminal_interface-curses-forms__adb.htm#ref_128_24">Top</a></span> : <a href="terminal_interface-curses__ads.htm#ref_59_9">Line_Position</a>; 342 <span class="symbol"><a name="ref_325_24" href="terminal_interface-curses-forms__adb.htm#ref_129_24">Left</a></span> : <a href="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 343 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_new.3x.html">dup_field()</A></em></span> 344 <b>pragma</b> Inline (Duplicate); 345 346 <span class="comment"><em>-- <A NAME="AFU_5">|</A></em></span> 347 <b>function</b> <span class="symbol"><a name="ref_330_13" href="terminal_interface-curses-forms__adb.htm#ref_148_13">Link</a></span> (<span class="symbol"><a name="ref_330_19" href="terminal_interface-curses-forms__adb.htm#ref_148_19">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 348 <span class="symbol"><a name="ref_331_19" href="terminal_interface-curses-forms__adb.htm#ref_149_19">Top</a></span> : <a href="terminal_interface-curses__ads.htm#ref_59_9">Line_Position</a>; 349 <span class="symbol"><a name="ref_332_19" href="terminal_interface-curses-forms__adb.htm#ref_150_19">Left</a></span> : <a href="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 350 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_new.3x.html">link_field()</A></em></span> 351 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_330_13">Link</a>); 352 353 <span class="comment"><em>-- |=====================================================================</em></span> 354 <span class="comment"><em>-- | Man page <A HREF="../man/form_field_just.3x.html">form_field_just.3x</A></em></span> 355 <span class="comment"><em>-- |=====================================================================</em></span> 356 357 <span class="comment"><em>-- <A NAME="AFU_6">|</A></em></span> 358 <b>procedure</b> <span class="symbol"><a name="ref_341_14" href="terminal_interface-curses-forms__adb.htm#ref_173_14">Set_Justification</a></span> (<span class="symbol"><a name="ref_341_33" href="terminal_interface-curses-forms__adb.htm#ref_173_33">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 359 <span class="symbol"><a name="ref_342_33" href="terminal_interface-curses-forms__adb.htm#ref_174_33">Just</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_58_9">Field_Justification</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_58_33">None</a>); 360 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_just.3x.html">set_field_just()</A></em></span> 361 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_341_14">Set_Justification</a>); 362 363 <span class="comment"><em>-- <A NAME="AFU_7">|</A></em></span> 364 <b>function</b> <span class="symbol"><a name="ref_347_13" href="terminal_interface-curses-forms__adb.htm#ref_187_13">Get_Justification</a></span> (<span class="symbol"><a name="ref_347_32" href="terminal_interface-curses-forms__adb.htm#ref_187_32">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_58_9">Field_Justification</a>; 365 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_just.3x.html">field_just()</A></em></span> 366 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_347_13">Get_Justification</a>); 367 368 <span class="comment"><em>-- |=====================================================================</em></span> 369 <span class="comment"><em>-- | Man page <A HREF="../man/form_field_buffer.3x.html">form_field_buffer.3x</A></em></span> 370 <span class="comment"><em>-- |=====================================================================</em></span> 371 372 <span class="comment"><em>-- <A NAME="AFU_8">|</A></em></span> 373 <b>procedure</b> <span class="symbol"><a name="ref_356_14" href="terminal_interface-curses-forms__adb.htm#ref_201_14">Set_Buffer</a></span> 374 (<span class="symbol"><a name="ref_357_7" href="terminal_interface-curses-forms__adb.htm#ref_202_7">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 375 <span class="symbol"><a name="ref_358_7" href="terminal_interface-curses-forms__adb.htm#ref_203_7">Buffer</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a>'First; 376 <span class="symbol"><a name="ref_359_7" href="terminal_interface-curses-forms__adb.htm#ref_204_7">Str</a></span> : String); 377 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_buffer.3x.html">set_field_buffer()</A></em></span> 378 <span class="comment"><em>-- Not inlined</em></span> 379 380 <span class="comment"><em>-- <A NAME="AFU_9">|</A></em></span> 381 <b>procedure</b> <span class="symbol"><a name="ref_364_14" href="terminal_interface-curses-forms__adb.htm#ref_218_14">Get_Buffer</a></span> 382 (<span class="symbol"><a name="ref_365_7" href="terminal_interface-curses-forms__adb.htm#ref_219_7">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 383 <span class="symbol"><a name="ref_366_7" href="terminal_interface-curses-forms__adb.htm#ref_220_7">Buffer</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a>'First; 384 <span class="symbol"><a name="ref_367_7" href="terminal_interface-curses-forms__adb.htm#ref_221_7">Str</a></span> : <b>out</b> String); 385 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_buffer.3x.html">field_buffer()</A></em></span> 386 387 <b>function</b> <span class="symbol"><a name="ref_370_13" href="terminal_interface-curses-forms__adb.htm#ref_230_13">Get_Buffer</a></span> 388 (<span class="symbol"><a name="ref_371_7" href="terminal_interface-curses-forms__adb.htm#ref_231_7">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 389 <span class="symbol"><a name="ref_372_7" href="terminal_interface-curses-forms__adb.htm#ref_232_7">Buffer</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a>'First) <b>return</b> String; 390 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_buffer.3x.html">field_buffer()</A></em></span> 391 <span class="comment"><em>-- Same but as function</em></span> 392 <b>pragma</b> Inline (Get_Buffer); 393 394 <span class="comment"><em>-- <A NAME="AFU_10">|</A></em></span> 395 <b>procedure</b> <span class="symbol"><a name="ref_378_14" href="terminal_interface-curses-forms__adb.htm#ref_243_14">Set_Status</a></span> (<span class="symbol"><a name="ref_378_26" href="terminal_interface-curses-forms__adb.htm#ref_243_26">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 396 <span class="symbol"><a name="ref_379_26" href="terminal_interface-curses-forms__adb.htm#ref_244_26">Status</a></span> : Boolean := True); 397 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_buffer.3x.html">set_field_status()</A></em></span> 398 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_378_14">Set_Status</a>); 399 400 <span class="comment"><em>-- <A NAME="AFU_11">|</A></em></span> 401 <b>function</b> <span class="symbol"><a name="ref_384_13" href="terminal_interface-curses-forms__adb.htm#ref_258_13">Changed</a></span> (<span class="symbol"><a name="ref_384_22" href="terminal_interface-curses-forms__adb.htm#ref_258_22">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>) <b>return</b> Boolean; 402 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_buffer.3x.html">field_status()</A></em></span> 403 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_384_13">Changed</a>); 404 405 <span class="comment"><em>-- <A NAME="AFU_12">|</A></em></span> 406 <b>procedure</b> <span class="symbol"><a name="ref_389_14" href="terminal_interface-curses-forms__adb.htm#ref_274_14">Set_Maximum_Size</a></span> (<span class="symbol"><a name="ref_389_32" href="terminal_interface-curses-forms__adb.htm#ref_274_32">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 407 <span class="symbol"><a name="ref_390_32" href="terminal_interface-curses-forms__adb.htm#ref_275_32">Max</a></span> : Natural := 0); 408 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_buffer.3x.html">set_field_max()</A></em></span> 409 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_389_14">Set_Maximum_Size</a>); 410 411 <span class="comment"><em>-- |=====================================================================</em></span> 412 <span class="comment"><em>-- | Man page <A HREF="../man/form_field_opts.3x.html">form_field_opts.3x</A></em></span> 413 <span class="comment"><em>-- |=====================================================================</em></span> 414 415 <span class="comment"><em>-- <A NAME="AFU_13">|</A></em></span> 416 <b>procedure</b> <span class="symbol"><a name="ref_399_14" href="terminal_interface-curses-forms__adb.htm#ref_291_14">Set_Options</a></span> (<span class="symbol"><a name="ref_399_27" href="terminal_interface-curses-forms__adb.htm#ref_291_27">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 417 <span class="symbol"><a name="ref_400_27" href="terminal_interface-curses-forms__adb.htm#ref_292_27">Options</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_63_9">Field_Option_Set</a>); 418 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_opts.3x.html">set_field_opts()</A></em></span> 419 <span class="comment"><em>-- An overloaded version is defined later. Pragma Inline appears there</em></span> 420 421 <span class="comment"><em>-- <A NAME="AFU_14">|</A></em></span> 422 <b>procedure</b> <span class="symbol"><a name="ref_405_14" href="terminal_interface-curses-forms__adb.htm#ref_304_14">Switch_Options</a></span> (<span class="symbol"><a name="ref_405_30" href="terminal_interface-curses-forms__adb.htm#ref_304_30">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 423 <span class="symbol"><a name="ref_406_30" href="terminal_interface-curses-forms__adb.htm#ref_305_30">Options</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_63_9">Field_Option_Set</a>; 424 <span class="symbol"><a name="ref_407_30" href="terminal_interface-curses-forms__adb.htm#ref_306_30">On</a></span> : Boolean := True); 425 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_opts.3x.html">field_opts_on()</A></em></span> 426 <span class="comment"><em>-- AKA: field_opts_off()</em></span> 427 <span class="comment"><em>-- An overloaded version is defined later. Pragma Inline appears there</em></span> 428 429 <span class="comment"><em>-- <A NAME="AFU_15">|</A></em></span> 430 <b>procedure</b> <span class="symbol"><a name="ref_413_14" href="terminal_interface-curses-forms__adb.htm#ref_325_14">Get_Options</a></span> (<span class="symbol"><a name="ref_413_27" href="terminal_interface-curses-forms__adb.htm#ref_325_27">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 431 <span class="symbol"><a name="ref_414_27" href="terminal_interface-curses-forms__adb.htm#ref_326_27">Options</a></span> : <b>out</b> <a href="terminal_interface-curses-forms__ads.htm#ref_63_9">Field_Option_Set</a>); 432 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_opts.3x.html">field_opts()</A></em></span> 433 434 <span class="comment"><em>-- <A NAME="AFU_16">|</A></em></span> 435 <b>function</b> <span class="symbol"><a name="ref_418_13" href="terminal_interface-curses-forms__adb.htm#ref_337_13">Get_Options</a></span> (<span class="symbol"><a name="ref_418_26" href="terminal_interface-curses-forms__adb.htm#ref_337_26">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_55_4">Null_Field</a>) 436 <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_63_9">Field_Option_Set</a>; 437 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_opts.3x.html">field_opts()</A></em></span> 438 <span class="comment"><em>-- An overloaded version is defined later. Pragma Inline appears there</em></span> 439 440 <span class="comment"><em>-- |=====================================================================</em></span> 441 <span class="comment"><em>-- | Man page <A HREF="../man/form_field_attributes.3x.html">form_field_attributes.3x</A></em></span> 442 <span class="comment"><em>-- |=====================================================================</em></span> 443 444 <span class="comment"><em>-- <A NAME="AFU_17">|</A></em></span> 445 <b>procedure</b> <span class="symbol"><a name="ref_428_14" href="terminal_interface-curses-forms__adb.htm#ref_352_14">Set_Foreground</a></span> 446 (<span class="symbol"><a name="ref_429_7" href="terminal_interface-curses-forms__adb.htm#ref_353_7">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 447 <span class="symbol"><a name="ref_430_7" href="terminal_interface-curses-forms__adb.htm#ref_354_7">Fore</a></span> : <a href="terminal_interface-curses__ads.htm#ref_418_9">Character_Attribute_Set</a> := <a href="terminal_interface-curses__ads.htm#ref_486_4">Normal_Video</a>; 448 <span class="symbol"><a name="ref_431_7" href="terminal_interface-curses-forms__adb.htm#ref_355_7">Color</a></span> : <a href="terminal_interface-curses__ads.htm#ref_410_9">Color_Pair</a> := <a href="terminal_interface-curses__ads.htm#ref_410_9">Color_Pair</a>'First); 449 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_attributes.3x.html">set_field_fore()</A></em></span> 450 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_428_14">Set_Foreground</a>); 451 452 <span class="comment"><em>-- <A NAME="AFU_18">|</A></em></span> 453 <b>procedure</b> <span class="symbol"><a name="ref_436_14" href="terminal_interface-curses-forms__adb.htm#ref_369_14">Foreground</a></span> (<span class="symbol"><a name="ref_436_26" href="terminal_interface-curses-forms__adb.htm#ref_369_26">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 454 <span class="symbol"><a name="ref_437_26" href="terminal_interface-curses-forms__adb.htm#ref_370_26">Fore</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_418_9">Character_Attribute_Set</a>); 455 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_attributes.3x.html">field_fore()</A></em></span> 456 457 <span class="comment"><em>-- <A NAME="AFU_19">|</A></em></span> 458 <b>procedure</b> <span class="symbol"><a name="ref_441_14" href="terminal_interface-curses-forms__adb.htm#ref_378_14">Foreground</a></span> (<span class="symbol"><a name="ref_441_26" href="terminal_interface-curses-forms__adb.htm#ref_378_26">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 459 <span class="symbol"><a name="ref_442_26" href="terminal_interface-curses-forms__adb.htm#ref_379_26">Fore</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_418_9">Character_Attribute_Set</a>; 460 <span class="symbol"><a name="ref_443_26" href="terminal_interface-curses-forms__adb.htm#ref_380_26">Color</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_410_9">Color_Pair</a>); 461 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_attributes.3x.html">field_fore()</A></em></span> 462 <b>pragma</b> Inline (Foreground); 463 464 <span class="comment"><em>-- <A NAME="AFU_20">|</A></em></span> 465 <b>procedure</b> <span class="symbol"><a name="ref_448_14" href="terminal_interface-curses-forms__adb.htm#ref_391_14">Set_Background</a></span> 466 (<span class="symbol"><a name="ref_449_7" href="terminal_interface-curses-forms__adb.htm#ref_392_7">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 467 <span class="symbol"><a name="ref_450_7" href="terminal_interface-curses-forms__adb.htm#ref_393_7">Back</a></span> : <a href="terminal_interface-curses__ads.htm#ref_418_9">Character_Attribute_Set</a> := <a href="terminal_interface-curses__ads.htm#ref_486_4">Normal_Video</a>; 468 <span class="symbol"><a name="ref_451_7" href="terminal_interface-curses-forms__adb.htm#ref_394_7">Color</a></span> : <a href="terminal_interface-curses__ads.htm#ref_410_9">Color_Pair</a> := <a href="terminal_interface-curses__ads.htm#ref_410_9">Color_Pair</a>'First); 469 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_attributes.3x.html">set_field_back()</A></em></span> 470 <b>pragma</b> Inline (Set_Background); 471 472 <span class="comment"><em>-- <A NAME="AFU_21">|</A></em></span> 473 <b>procedure</b> <span class="symbol"><a name="ref_456_14" href="terminal_interface-curses-forms__adb.htm#ref_408_14">Background</a></span> (<span class="symbol"><a name="ref_456_26" href="terminal_interface-curses-forms__adb.htm#ref_408_26">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 474 <span class="symbol"><a name="ref_457_26" href="terminal_interface-curses-forms__adb.htm#ref_409_26">Back</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_418_9">Character_Attribute_Set</a>); 475 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_attributes.3x.html">field_back()</A></em></span> 476 477 <span class="comment"><em>-- <A NAME="AFU_22">|</A></em></span> 478 <b>procedure</b> <span class="symbol"><a name="ref_461_14" href="terminal_interface-curses-forms__adb.htm#ref_417_14">Background</a></span> (<span class="symbol"><a name="ref_461_26" href="terminal_interface-curses-forms__adb.htm#ref_417_26">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 479 <span class="symbol"><a name="ref_462_26" href="terminal_interface-curses-forms__adb.htm#ref_418_26">Back</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_418_9">Character_Attribute_Set</a>; 480 <span class="symbol"><a name="ref_463_26" href="terminal_interface-curses-forms__adb.htm#ref_419_26">Color</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_410_9">Color_Pair</a>); 481 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_attributes.3x.html">field_back()</A></em></span> 482 <b>pragma</b> Inline (Background); 483 484 <span class="comment"><em>-- <A NAME="AFU_23">|</A></em></span> 485 <b>procedure</b> <span class="symbol"><a name="ref_468_14" href="terminal_interface-curses-forms__adb.htm#ref_430_14">Set_Pad_Character</a></span> (<span class="symbol"><a name="ref_468_33" href="terminal_interface-curses-forms__adb.htm#ref_430_33">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 486 <span class="symbol"><a name="ref_469_33" href="terminal_interface-curses-forms__adb.htm#ref_431_33">Pad</a></span> : Character := Space); 487 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_attributes.3x.html">set_field_pad()</A></em></span> 488 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_468_14">Set_Pad_Character</a>); 489 490 <span class="comment"><em>-- <A NAME="AFU_24">|</A></em></span> 491 <b>procedure</b> <span class="symbol"><a name="ref_474_14" href="terminal_interface-curses-forms__adb.htm#ref_444_14">Pad_Character</a></span> (<span class="symbol"><a name="ref_474_29" href="terminal_interface-curses-forms__adb.htm#ref_444_29">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 492 <span class="symbol"><a name="ref_475_29" href="terminal_interface-curses-forms__adb.htm#ref_445_29">Pad</a></span> : <b>out</b> Character); 493 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_attributes.3x.html">field_pad()</A></em></span> 494 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_474_14">Pad_Character</a>); 495 496 <span class="comment"><em>-- |=====================================================================</em></span> 497 <span class="comment"><em>-- | Man page <A HREF="../man/form_field_info.3x.html">form_field_info.3x</A></em></span> 498 <span class="comment"><em>-- |=====================================================================</em></span> 499 500 <span class="comment"><em>-- <A NAME="AFU_25">|</A></em></span> 501 <b>procedure</b> <span class="symbol"><a name="ref_484_14" href="terminal_interface-curses-forms__adb.htm#ref_459_14">Info</a></span> (<span class="symbol"><a name="ref_484_20" href="terminal_interface-curses-forms__adb.htm#ref_459_20">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 502 <span class="symbol"><a name="ref_485_20" href="terminal_interface-curses-forms__adb.htm#ref_460_20">Lines</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_62_12">Line_Count</a>; 503 <span class="symbol"><a name="ref_486_20" href="terminal_interface-curses-forms__adb.htm#ref_461_20">Columns</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_64_12">Column_Count</a>; 504 <span class="symbol"><a name="ref_487_20" href="terminal_interface-curses-forms__adb.htm#ref_462_20">First_Row</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_59_9">Line_Position</a>; 505 <span class="symbol"><a name="ref_488_20" href="terminal_interface-curses-forms__adb.htm#ref_463_20">First_Column</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</a>; 506 <span class="symbol"><a name="ref_489_20" href="terminal_interface-curses-forms__adb.htm#ref_464_20">Off_Screen</a></span> : <b>out</b> Natural; 507 <span class="symbol"><a name="ref_490_20" href="terminal_interface-curses-forms__adb.htm#ref_465_20">Additional_Buffers</a></span> : <b>out</b> <a href="terminal_interface-curses-forms__ads.htm#ref_131_9">Buffer_Number</a>); 508 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_info.3x.html">field_info()</A></em></span> 509 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_484_14">Info</a>); 510 511 <span class="comment"><em>-- <A NAME="AFU_26">|</A></em></span> 512 <b>procedure</b> <span class="symbol"><a name="ref_495_14" href="terminal_interface-curses-forms__adb.htm#ref_489_14">Dynamic_Info</a></span> (<span class="symbol"><a name="ref_495_28" href="terminal_interface-curses-forms__adb.htm#ref_489_28">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 513 <span class="symbol"><a name="ref_496_28" href="terminal_interface-curses-forms__adb.htm#ref_490_28">Lines</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_62_12">Line_Count</a>; 514 <span class="symbol"><a name="ref_497_28" href="terminal_interface-curses-forms__adb.htm#ref_491_28">Columns</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_64_12">Column_Count</a>; 515 <span class="symbol"><a name="ref_498_28" href="terminal_interface-curses-forms__adb.htm#ref_492_28">Max</a></span> : <b>out</b> Natural); 516 <span class="comment"><em>-- AKA: <A HREF="../man/form_field_info.3x.html">dynamic_field_info()</A></em></span> 517 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_495_14">Dynamic_Info</a>); 518 519 <span class="comment"><em>-- |=====================================================================</em></span> 520 <span class="comment"><em>-- | Man page <A HREF="../man/form_win.3x.html">form_win.3x</A></em></span> 521 <span class="comment"><em>-- |=====================================================================</em></span> 522 523 <span class="comment"><em>-- <A NAME="AFU_27">|</A></em></span> 524 <b>procedure</b> <span class="symbol"><a name="ref_507_14" href="terminal_interface-curses-forms__adb.htm#ref_514_14">Set_Window</a></span> (<span class="symbol"><a name="ref_507_26" href="terminal_interface-curses-forms__adb.htm#ref_514_26">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 525 <span class="symbol"><a name="ref_508_26" href="terminal_interface-curses-forms__adb.htm#ref_515_26">Win</a></span> : <a href="terminal_interface-curses__ads.htm#ref_56_9">Window</a>); 526 <span class="comment"><em>-- AKA: <A HREF="../man/form_win.3x.html">set_form_win()</A></em></span> 527 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_507_14">Set_Window</a>); 528 529 <span class="comment"><em>-- <A NAME="AFU_28">|</A></em></span> 530 <b>function</b> <span class="symbol"><a name="ref_513_13" href="terminal_interface-curses-forms__adb.htm#ref_527_13">Get_Window</a></span> (<span class="symbol"><a name="ref_513_25" href="terminal_interface-curses-forms__adb.htm#ref_527_25">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> <a href="terminal_interface-curses__ads.htm#ref_56_9">Window</a>; 531 <span class="comment"><em>-- AKA: <A HREF="../man/form_win.3x.html">form_win()</A></em></span> 532 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_513_13">Get_Window</a>); 533 534 <span class="comment"><em>-- <A NAME="AFU_29">|</A></em></span> 535 <b>procedure</b> <span class="symbol"><a name="ref_518_14" href="terminal_interface-curses-forms__adb.htm#ref_539_14">Set_Sub_Window</a></span> (<span class="symbol"><a name="ref_518_30" href="terminal_interface-curses-forms__adb.htm#ref_539_30">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 536 <span class="symbol"><a name="ref_519_30" href="terminal_interface-curses-forms__adb.htm#ref_540_30">Win</a></span> : <a href="terminal_interface-curses__ads.htm#ref_56_9">Window</a>); 537 <span class="comment"><em>-- AKA: <A HREF="../man/form_win.3x.html">set_form_sub()</A></em></span> 538 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_518_14">Set_Sub_Window</a>); 539 540 <span class="comment"><em>-- <A NAME="AFU_30">|</A></em></span> 541 <b>function</b> <span class="symbol"><a name="ref_524_13" href="terminal_interface-curses-forms__adb.htm#ref_552_13">Get_Sub_Window</a></span> (<span class="symbol"><a name="ref_524_29" href="terminal_interface-curses-forms__adb.htm#ref_552_29">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> <a href="terminal_interface-curses__ads.htm#ref_56_9">Window</a>; 542 <span class="comment"><em>-- AKA: <A HREF="../man/form_win.3x.html">form_sub()</A></em></span> 543 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_524_13">Get_Sub_Window</a>); 544 545 <span class="comment"><em>-- <A NAME="AFU_31">|</A></em></span> 546 <b>procedure</b> <span class="symbol"><a name="ref_529_14" href="terminal_interface-curses-forms__adb.htm#ref_564_14">Scale</a></span> (<span class="symbol"><a name="ref_529_21" href="terminal_interface-curses-forms__adb.htm#ref_564_21">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 547 <span class="symbol"><a name="ref_530_21" href="terminal_interface-curses-forms__adb.htm#ref_565_21">Lines</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_62_12">Line_Count</a>; 548 <span class="symbol"><a name="ref_531_21" href="terminal_interface-curses-forms__adb.htm#ref_566_21">Columns</a></span> : <b>out</b> <a href="terminal_interface-curses__ads.htm#ref_64_12">Column_Count</a>); 549 <span class="comment"><em>-- AKA: <A HREF="../man/form_win.3x.html">scale_form()</A></em></span> 550 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_529_14">Scale</a>); 551 552 <span class="comment"><em>-- |=====================================================================</em></span> 553 <span class="comment"><em>-- | Man page <A HREF="../man/form_hook.3x.html">form_hook.3x</A></em></span> 554 <span class="comment"><em>-- |=====================================================================</em></span> 555 556 <b>type</b> <span class="symbol"><a name="ref_539_9">Form_Hook_Function</a></span> <b>is</b> <b>access</b> <b>procedure</b> (<span class="symbol"><a name="ref_539_49">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>); 557 <b>pragma</b> Convention (C, <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>); 558 559 <span class="comment"><em>-- <A NAME="AFU_32">|</A></em></span> 560 <b>procedure</b> <span class="symbol"><a name="ref_543_14" href="terminal_interface-curses-forms__adb.htm#ref_585_14">Set_Field_Init_Hook</a></span> (<span class="symbol"><a name="ref_543_35" href="terminal_interface-curses-forms__adb.htm#ref_585_35">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 561 <span class="symbol"><a name="ref_544_35" href="terminal_interface-curses-forms__adb.htm#ref_586_35">Proc</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>); 562 <span class="comment"><em>-- AKA: <A HREF="../man/form_hook.3x.html">set_field_init()</A></em></span> 563 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_543_14">Set_Field_Init_Hook</a>); 564 565 <span class="comment"><em>-- <A NAME="AFU_33">|</A></em></span> 566 <b>procedure</b> <span class="symbol"><a name="ref_549_14" href="terminal_interface-curses-forms__adb.htm#ref_598_14">Set_Field_Term_Hook</a></span> (<span class="symbol"><a name="ref_549_35" href="terminal_interface-curses-forms__adb.htm#ref_598_35">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 567 <span class="symbol"><a name="ref_550_35" href="terminal_interface-curses-forms__adb.htm#ref_599_35">Proc</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>); 568 <span class="comment"><em>-- AKA: <A HREF="../man/form_hook.3x.html">set_field_term()</A></em></span> 569 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_549_14">Set_Field_Term_Hook</a>); 570 571 <span class="comment"><em>-- <A NAME="AFU_34">|</A></em></span> 572 <b>procedure</b> <span class="symbol"><a name="ref_555_14" href="terminal_interface-curses-forms__adb.htm#ref_611_14">Set_Form_Init_Hook</a></span> (<span class="symbol"><a name="ref_555_34" href="terminal_interface-curses-forms__adb.htm#ref_611_34">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 573 <span class="symbol"><a name="ref_556_34" href="terminal_interface-curses-forms__adb.htm#ref_612_34">Proc</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>); 574 <span class="comment"><em>-- AKA: <A HREF="../man/form_hook.3x.html">set_form_init()</A></em></span> 575 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_555_14">Set_Form_Init_Hook</a>); 576 577 <span class="comment"><em>-- <A NAME="AFU_35">|</A></em></span> 578 <b>procedure</b> <span class="symbol"><a name="ref_561_14" href="terminal_interface-curses-forms__adb.htm#ref_624_14">Set_Form_Term_Hook</a></span> (<span class="symbol"><a name="ref_561_34" href="terminal_interface-curses-forms__adb.htm#ref_624_34">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 579 <span class="symbol"><a name="ref_562_34" href="terminal_interface-curses-forms__adb.htm#ref_625_34">Proc</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>); 580 <span class="comment"><em>-- AKA: <A HREF="../man/form_hook.3x.html">set_form_term()</A></em></span> 581 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_561_14">Set_Form_Term_Hook</a>); 582 583 <span class="comment"><em>-- <A NAME="AFU_36">|</A></em></span> 584 <b>function</b> <span class="symbol"><a name="ref_567_13">Get_Field_Init_Hook</a></span> (<span class="symbol"><a name="ref_567_34">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>; 585 <span class="comment"><em>-- AKA: <A HREF="../man/form_hook.3x.html">field_init()</A></em></span> 586 <b>pragma</b> Import (C, Get_Field_Init_Hook, "field_init"); 587 588 <span class="comment"><em>-- <A NAME="AFU_37">|</A></em></span> 589 <b>function</b> <span class="symbol"><a name="ref_572_13">Get_Field_Term_Hook</a></span> (<span class="symbol"><a name="ref_572_34">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>; 590 <span class="comment"><em>-- AKA: <A HREF="../man/form_hook.3x.html">field_term()</A></em></span> 591 <b>pragma</b> Import (C, Get_Field_Term_Hook, "field_term"); 592 593 <span class="comment"><em>-- <A NAME="AFU_38">|</A></em></span> 594 <b>function</b> <span class="symbol"><a name="ref_577_13">Get_Form_Init_Hook</a></span> (<span class="symbol"><a name="ref_577_33">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>; 595 <span class="comment"><em>-- AKA: <A HREF="../man/form_hook.3x.html">form_init()</A></em></span> 596 <b>pragma</b> Import (C, Get_Form_Init_Hook, "form_init"); 597 598 <span class="comment"><em>-- <A NAME="AFU_39">|</A></em></span> 599 <b>function</b> <span class="symbol"><a name="ref_582_13">Get_Form_Term_Hook</a></span> (<span class="symbol"><a name="ref_582_33">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_539_9">Form_Hook_Function</a>; 600 <span class="comment"><em>-- AKA: <A HREF="../man/form_hook.3x.html">form_term()</A></em></span> 601 <b>pragma</b> Import (C, Get_Form_Term_Hook, "form_term"); 602 603 <span class="comment"><em>-- |=====================================================================</em></span> 604 <span class="comment"><em>-- | Man page <A HREF="../man/form_field.3x.html">form_field.3x</A></em></span> 605 <span class="comment"><em>-- |=====================================================================</em></span> 606 607 <span class="comment"><em>-- <A NAME="AFU_40">|</A></em></span> 608 <b>procedure</b> <span class="symbol"><a name="ref_591_14" href="terminal_interface-curses-forms__adb.htm#ref_641_14">Redefine</a></span> (<span class="symbol"><a name="ref_591_24" href="terminal_interface-curses-forms__adb.htm#ref_641_24">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 609 <span class="symbol"><a name="ref_592_24" href="terminal_interface-curses-forms__adb.htm#ref_642_24">Flds</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_136_9">Field_Array_Access</a>); 610 <span class="comment"><em>-- AKA: <A HREF="../man/form_field.3x.html">set_form_fields()</A></em></span> 611 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_591_14">Redefine</a>); 612 613 <span class="comment"><em>-- <A NAME="AFU_41">|</A></em></span> 614 <b>procedure</b> <span class="symbol"><a name="ref_597_14">Set_Fields</a></span> (<span class="symbol"><a name="ref_597_26">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 615 <span class="symbol"><a name="ref_598_26">Flds</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_136_9">Field_Array_Access</a>) <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_591_14">Redefine</a>; 616 <span class="comment"><em>-- AKA: <A HREF="../man/form_field.3x.html">set_form_fields()</A></em></span> 617 <span class="comment"><em>-- pragma Inline (Set_Fields);</em></span> 618 619 <span class="comment"><em>-- <A NAME="AFU_42">|</A></em></span> 620 <b>function</b> <span class="symbol"><a name="ref_603_13" href="terminal_interface-curses-forms__adb.htm#ref_659_13">Fields</a></span> (<span class="symbol"><a name="ref_603_21" href="terminal_interface-curses-forms__adb.htm#ref_659_21">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 621 <span class="symbol"><a name="ref_604_21" href="terminal_interface-curses-forms__adb.htm#ref_660_21">Index</a></span> : Positive) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 622 <span class="comment"><em>-- AKA: <A HREF="../man/form_field.3x.html">form_fields()</A></em></span> 623 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_603_13">Fields</a>); 624 625 <span class="comment"><em>-- <A NAME="AFU_43">|</A></em></span> 626 <b>function</b> <span class="symbol"><a name="ref_609_13" href="terminal_interface-curses-forms__adb.htm#ref_679_13">Field_Count</a></span> (<span class="symbol"><a name="ref_609_26" href="terminal_interface-curses-forms__adb.htm#ref_679_26">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> Natural; 627 <span class="comment"><em>-- AKA: <A HREF="../man/form_field.3x.html">field_count()</A></em></span> 628 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_609_13">Field_Count</a>); 629 630 <span class="comment"><em>-- <A NAME="AFU_44">|</A></em></span> 631 <b>procedure</b> <span class="symbol"><a name="ref_614_14" href="terminal_interface-curses-forms__adb.htm#ref_689_14">Move</a></span> (<span class="symbol"><a name="ref_614_20" href="terminal_interface-curses-forms__adb.htm#ref_689_20">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 632 <span class="symbol"><a name="ref_615_20" href="terminal_interface-curses-forms__adb.htm#ref_690_20">Line</a></span> : <a href="terminal_interface-curses__ads.htm#ref_59_9">Line_Position</a>; 633 <span class="symbol"><a name="ref_616_20" href="terminal_interface-curses-forms__adb.htm#ref_691_20">Column</a></span> : <a href="terminal_interface-curses__ads.htm#ref_60_9">Column_Position</a>); 634 <span class="comment"><em>-- AKA: <A HREF="../man/form_field.3x.html">move_field()</A></em></span> 635 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_614_14">Move</a>); 636 637 <span class="comment"><em>-- |=====================================================================</em></span> 638 <span class="comment"><em>-- | Man page <A HREF="../man/form_new.3x.html">form_new.3x</A></em></span> 639 <span class="comment"><em>-- |=====================================================================</em></span> 640 641 <span class="comment"><em>-- <A NAME="AFU_45">|</A></em></span> 642 <b>function</b> <span class="symbol"><a name="ref_625_13" href="terminal_interface-curses-forms__adb.htm#ref_706_13">Create</a></span> (<span class="symbol"><a name="ref_625_21" href="terminal_interface-curses-forms__adb.htm#ref_706_21">Fields</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_136_9">Field_Array_Access</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 643 <span class="comment"><em>-- AKA: <A HREF="../man/form_new.3x.html">new_form()</A></em></span> 644 <b>pragma</b> Inline (Create); 645 646 <span class="comment"><em>-- <A NAME="AFU_46">|</A></em></span> 647 <b>function</b> New_Form (<span class="symbol"><a name="ref_630_23">Fields</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_136_9">Field_Array_Access</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a> 648 <b>renames</b> <a href="terminal_interface-curses-forms__ads.htm#ref_625_13">Create</a>; 649 <span class="comment"><em>-- AKA: <A HREF="../man/form_new.3x.html">new_form()</A></em></span> 650 <span class="comment"><em>-- pragma Inline (New_Form);</em></span> 651 652 <span class="comment"><em>-- <A NAME="AFU_47">|</A></em></span> 653 <b>procedure</b> <span class="symbol"><a name="ref_636_14" href="terminal_interface-curses-forms__adb.htm#ref_727_14">Delete</a></span> (<span class="symbol"><a name="ref_636_22" href="terminal_interface-curses-forms__adb.htm#ref_727_22">Frm</a></span> : <b>in</b> <b>out</b> <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>); 654 <span class="comment"><em>-- AKA: <A HREF="../man/form_new.3x.html">free_form()</A></em></span> 655 <span class="comment"><em>-- Reset Frm to Null_Form</em></span> 656 <b>pragma</b> Inline (Delete); 657 658 <span class="comment"><em>-- |=====================================================================</em></span> 659 <span class="comment"><em>-- | Man page <A HREF="../man/form_opts.3x.html">form_opts.3x</A></em></span> 660 <span class="comment"><em>-- |=====================================================================</em></span> 661 662 <span class="comment"><em>-- <A NAME="AFU_48">|</A></em></span> 663 <b>procedure</b> <span class="symbol"><a name="ref_646_14" href="terminal_interface-curses-forms__adb.htm#ref_743_14">Set_Options</a></span> (<span class="symbol"><a name="ref_646_27" href="terminal_interface-curses-forms__adb.htm#ref_743_27">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 664 <span class="symbol"><a name="ref_647_27" href="terminal_interface-curses-forms__adb.htm#ref_744_27">Options</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_109_9">Form_Option_Set</a>); 665 <span class="comment"><em>-- AKA: <A HREF="../man/form_opts.3x.html">set_form_opts()</A></em></span> 666 <b>pragma</b> Inline (Set_Options); 667 668 <span class="comment"><em>-- <A NAME="AFU_49">|</A></em></span> 669 <b>procedure</b> <span class="symbol"><a name="ref_652_14" href="terminal_interface-curses-forms__adb.htm#ref_756_14">Switch_Options</a></span> (<span class="symbol"><a name="ref_652_30" href="terminal_interface-curses-forms__adb.htm#ref_756_30">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 670 <span class="symbol"><a name="ref_653_30" href="terminal_interface-curses-forms__adb.htm#ref_757_30">Options</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_109_9">Form_Option_Set</a>; 671 <span class="symbol"><a name="ref_654_30" href="terminal_interface-curses-forms__adb.htm#ref_758_30">On</a></span> : Boolean := True); 672 <span class="comment"><em>-- AKA: <A HREF="../man/form_opts.3x.html">form_opts_on()</A></em></span> 673 <span class="comment"><em>-- AKA: form_opts_off()</em></span> 674 <b>pragma</b> Inline (Switch_Options); 675 676 <span class="comment"><em>-- <A NAME="AFU_50">|</A></em></span> 677 <b>procedure</b> <span class="symbol"><a name="ref_660_14" href="terminal_interface-curses-forms__adb.htm#ref_777_14">Get_Options</a></span> (<span class="symbol"><a name="ref_660_27" href="terminal_interface-curses-forms__adb.htm#ref_777_27">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 678 <span class="symbol"><a name="ref_661_27" href="terminal_interface-curses-forms__adb.htm#ref_778_27">Options</a></span> : <b>out</b> <a href="terminal_interface-curses-forms__ads.htm#ref_109_9">Form_Option_Set</a>); 679 <span class="comment"><em>-- AKA: <A HREF="../man/form_opts.3x.html">form_opts()</A></em></span> 680 681 <span class="comment"><em>-- <A NAME="AFU_51">|</A></em></span> 682 <b>function</b> <span class="symbol"><a name="ref_665_13" href="terminal_interface-curses-forms__adb.htm#ref_789_13">Get_Options</a></span> (<span class="symbol"><a name="ref_665_26" href="terminal_interface-curses-forms__adb.htm#ref_789_26">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_56_4">Null_Form</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_109_9">Form_Option_Set</a>; 683 <span class="comment"><em>-- AKA: <A HREF="../man/form_opts.3x.html">form_opts()</A></em></span> 684 <b>pragma</b> Inline (Get_Options); 685 686 <span class="comment"><em>-- |=====================================================================</em></span> 687 <span class="comment"><em>-- | Man page <A HREF="../man/form_post.3x.html">form_post.3x</A></em></span> 688 <span class="comment"><em>-- |=====================================================================</em></span> 689 690 <span class="comment"><em>-- <A NAME="AFU_52">|</A></em></span> 691 <b>procedure</b> <span class="symbol"><a name="ref_674_14" href="terminal_interface-curses-forms__adb.htm#ref_803_14">Post</a></span> (<span class="symbol"><a name="ref_674_20" href="terminal_interface-curses-forms__adb.htm#ref_803_20">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 692 <span class="symbol"><a name="ref_675_20" href="terminal_interface-curses-forms__adb.htm#ref_804_20">Post</a></span> : Boolean := True); 693 <span class="comment"><em>-- AKA: <A HREF="../man/form_post.3x.html">post_form()</A></em></span> 694 <span class="comment"><em>-- AKA: unpost_form()</em></span> 695 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_674_14">Post</a>); 696 697 <span class="comment"><em>-- |=====================================================================</em></span> 698 <span class="comment"><em>-- | Man page <A HREF="../man/form_cursor.3x.html">form_cursor.3x</A></em></span> 699 <span class="comment"><em>-- |=====================================================================</em></span> 700 701 <span class="comment"><em>-- <A NAME="AFU_53">|</A></em></span> 702 <b>procedure</b> <span class="symbol"><a name="ref_685_14" href="terminal_interface-curses-forms__adb.htm#ref_825_14">Position_Cursor</a></span> (<span class="symbol"><a name="ref_685_31" href="terminal_interface-curses-forms__adb.htm#ref_825_31">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>); 703 <span class="comment"><em>-- AKA: <A HREF="../man/form_cursor.3x.html">pos_form_cursor()</A></em></span> 704 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_685_14">Position_Cursor</a>); 705 706 <span class="comment"><em>-- |=====================================================================</em></span> 707 <span class="comment"><em>-- | Man page <A HREF="../man/form_data.3x.html">form_data.3x</A></em></span> 708 <span class="comment"><em>-- |=====================================================================</em></span> 709 710 <span class="comment"><em>-- <A NAME="AFU_54">|</A></em></span> 711 <b>function</b> <span class="symbol"><a name="ref_694_13" href="terminal_interface-curses-forms__adb.htm#ref_840_13">Data_Ahead</a></span> (<span class="symbol"><a name="ref_694_25" href="terminal_interface-curses-forms__adb.htm#ref_840_25">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> Boolean; 712 <span class="comment"><em>-- AKA: <A HREF="../man/form_data.3x.html">data_ahead()</A></em></span> 713 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_694_13">Data_Ahead</a>); 714 715 <span class="comment"><em>-- <A NAME="AFU_55">|</A></em></span> 716 <b>function</b> <span class="symbol"><a name="ref_699_13" href="terminal_interface-curses-forms__adb.htm#ref_856_13">Data_Behind</a></span> (<span class="symbol"><a name="ref_699_26" href="terminal_interface-curses-forms__adb.htm#ref_856_26">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> Boolean; 717 <span class="comment"><em>-- AKA: <A HREF="../man/form_data.3x.html">data_behind()</A></em></span> 718 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_699_13">Data_Behind</a>); 719 720 <span class="comment"><em>-- |=====================================================================</em></span> 721 <span class="comment"><em>-- | Man page <A HREF="../man/form_driver.3x.html">form_driver.3x</A></em></span> 722 <span class="comment"><em>-- |=====================================================================</em></span> 723 724 <b>type</b> <span class="symbol"><a name="ref_707_9">Driver_Result</a></span> <b>is</b> (<span class="symbol"><a name="ref_707_27">Form_Ok</a></span>, 725 <span class="symbol"><a name="ref_708_27">Request_Denied</a></span>, 726 <span class="symbol"><a name="ref_709_27">Unknown_Request</a></span>, 727 <span class="symbol"><a name="ref_710_27">Invalid_Field</a></span>); 728 729 <span class="comment"><em>-- <A NAME="AFU_56">|</A></em></span> 730 <b>function</b> <span class="symbol"><a name="ref_713_13" href="terminal_interface-curses-forms__adb.htm#ref_876_13">Driver</a></span> (<span class="symbol"><a name="ref_713_21" href="terminal_interface-curses-forms__adb.htm#ref_876_21">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 731 <span class="symbol"><a name="ref_714_21" href="terminal_interface-curses-forms__adb.htm#ref_877_21">Key</a></span> : <a href="terminal_interface-curses__ads.htm#ref_67_9">Key_Code</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_707_9">Driver_Result</a>; 732 <span class="comment"><em>-- AKA: <A HREF="../man/form_driver.3x.html">form_driver()</A></em></span> 733 <span class="comment"><em>-- Driver not inlined</em></span> 734 735 <span class="comment"><em>-- |=====================================================================</em></span> 736 <span class="comment"><em>-- | Man page <A HREF="../man/form_page.3x.html">form_page.3x</A></em></span> 737 <span class="comment"><em>-- |=====================================================================</em></span> 738 739 <b>type</b> <span class="symbol"><a name="ref_722_9">Page_Number</a></span> <b>is</b> <b>new</b> Natural; 740 741 <span class="comment"><em>-- <A NAME="AFU_57">|</A></em></span> 742 <b>procedure</b> <span class="symbol"><a name="ref_725_14" href="terminal_interface-curses-forms__adb.htm#ref_903_14">Set_Current</a></span> (<span class="symbol"><a name="ref_725_27" href="terminal_interface-curses-forms__adb.htm#ref_903_27">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 743 <span class="symbol"><a name="ref_726_27" href="terminal_interface-curses-forms__adb.htm#ref_904_27">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>); 744 <span class="comment"><em>-- AKA: <A HREF="../man/form_page.3x.html">set_current_field()</A></em></span> 745 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_725_14">Set_Current</a>); 746 747 <span class="comment"><em>-- <A NAME="AFU_58">|</A></em></span> 748 <b>function</b> <span class="symbol"><a name="ref_731_13" href="terminal_interface-curses-forms__adb.htm#ref_915_13">Current</a></span> (<span class="symbol"><a name="ref_731_22" href="terminal_interface-curses-forms__adb.htm#ref_915_22">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 749 <span class="comment"><em>-- AKA: <A HREF="../man/form_page.3x.html">current_field()</A></em></span> 750 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_731_13">Current</a>); 751 752 <span class="comment"><em>-- <A NAME="AFU_59">|</A></em></span> 753 <b>procedure</b> <span class="symbol"><a name="ref_736_14" href="terminal_interface-curses-forms__adb.htm#ref_930_14">Set_Page</a></span> (<span class="symbol"><a name="ref_736_24" href="terminal_interface-curses-forms__adb.htm#ref_930_24">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>; 754 <span class="symbol"><a name="ref_737_24" href="terminal_interface-curses-forms__adb.htm#ref_931_24">Page</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_722_9">Page_Number</a> := <a href="terminal_interface-curses-forms__ads.htm#ref_722_9">Page_Number</a>'First); 755 <span class="comment"><em>-- AKA: <A HREF="../man/form_page.3x.html">set_form_page()</A></em></span> 756 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_736_14">Set_Page</a>); 757 758 <span class="comment"><em>-- <A NAME="AFU_60">|</A></em></span> 759 <b>function</b> <span class="symbol"><a name="ref_742_13" href="terminal_interface-curses-forms__adb.htm#ref_942_13">Page</a></span> (<span class="symbol"><a name="ref_742_19" href="terminal_interface-curses-forms__adb.htm#ref_942_19">Frm</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a>) <b>return</b> <a href="terminal_interface-curses-forms__ads.htm#ref_722_9">Page_Number</a>; 760 <span class="comment"><em>-- AKA: <A HREF="../man/form_page.3x.html">form_page()</A></em></span> 761 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_742_13">Page</a>); 762 763 <span class="comment"><em>-- <A NAME="AFU_61">|</A></em></span> 764 <b>function</b> <span class="symbol"><a name="ref_747_13" href="terminal_interface-curses-forms__adb.htm#ref_956_13">Get_Index</a></span> (<span class="symbol"><a name="ref_747_24" href="terminal_interface-curses-forms__adb.htm#ref_956_24">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>) <b>return</b> Positive; 765 <span class="comment"><em>-- AKA: <A HREF="../man/form_page.3x.html">field_index()</A></em></span> 766 <span class="comment"><em>-- Please note that in this binding we start the numbering of fields</em></span> 767 <span class="comment"><em>-- with 1. So this is number is one more than you get from the low</em></span> 768 <span class="comment"><em>-- level call.</em></span> 769 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_747_13">Get_Index</a>); 770 771 <span class="comment"><em>-- |=====================================================================</em></span> 772 <span class="comment"><em>-- | Man page <A HREF="../man/form_new_page.3x.html">form_new_page.3x</A></em></span> 773 <span class="comment"><em>-- |=====================================================================</em></span> 774 775 <span class="comment"><em>-- <A NAME="AFU_62">|</A></em></span> 776 <b>procedure</b> <span class="symbol"><a name="ref_759_14" href="terminal_interface-curses-forms__adb.htm#ref_976_14">Set_New_Page</a></span> (<span class="symbol"><a name="ref_759_28" href="terminal_interface-curses-forms__adb.htm#ref_976_28">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>; 777 <span class="symbol"><a name="ref_760_28" href="terminal_interface-curses-forms__adb.htm#ref_977_28">New_Page</a></span> : Boolean := True); 778 <span class="comment"><em>-- AKA: <A HREF="../man/form_new_page.3x.html">set_new_page()</A></em></span> 779 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_759_14">Set_New_Page</a>); 780 781 <span class="comment"><em>-- <A NAME="AFU_63">|</A></em></span> 782 <b>function</b> <span class="symbol"><a name="ref_765_13" href="terminal_interface-curses-forms__adb.htm#ref_988_13">Is_New_Page</a></span> (<span class="symbol"><a name="ref_765_26" href="terminal_interface-curses-forms__adb.htm#ref_988_26">Fld</a></span> : <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a>) <b>return</b> Boolean; 783 <span class="comment"><em>-- AKA: <A HREF="../man/form_new_page.3x.html">new_page()</A></em></span> 784 <b>pragma</b> Inline (<a href="terminal_interface-curses-forms__ads.htm#ref_765_13">Is_New_Page</a>); 785 786 <span class="comment"><em>-- |=====================================================================</em></span> 787 <span class="comment"><em>-- | Man page <A HREF="../man/form_requestname.3x.html">form_requestname.3x</A></em></span> 788 <span class="comment"><em>-- |=====================================================================</em></span> 789 <span class="comment"><em>-- Not Implemented: form_request_name, form_request_by_name</em></span> 790 791<span class="comment"><em>------------------------------------------------------------------------------</em></span> 792<b>private</b> 793 <b>type</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a> <b>is</b> <b>new</b> System.Storage_Elements.Integer_Address; 794 <b>type</b> <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a> <b>is</b> <b>new</b> System.Storage_Elements.Integer_Address; 795 796 <a href="terminal_interface-curses-forms__ads.htm#ref_55_4">Null_Field</a> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_52_9">Field</a> := 0; 797 <a href="terminal_interface-curses-forms__ads.htm#ref_56_4">Null_Form</a> : <b>constant</b> <a href="terminal_interface-curses-forms__ads.htm#ref_53_9">Form</a> := 0; 798 799<b>end</b> <a href="terminal_interface__ads.htm#ref_43_9">Terminal_Interface</a>.<a href="terminal_interface-curses__ads.htm#ref_48_28">Curses</a>.<a href="terminal_interface-curses-forms__ads.htm#ref_46_35">Forms</a>; 800</pre></body></html> 801