terminal_interface-curses-forms__ads.htm

ncurses 库 可能有用酒用 没用就算了 我觉得还可以用

   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_win.3x.html">form_sub()</A></EM></FONT>
   <b>pragma</b> Inline (Get_Sub_Window);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_31"#2|</EM></FONT>
   <b>procedure</b> Scale (<FONT COLOR=red><A NAME="ref_528_21" HREF="terminal_interface-curses-forms__adb.htm#ref_639_21">Frm</A></FONT>     : <b>in</b> Form;
                    <FONT COLOR=red><A NAME="ref_529_21" HREF="terminal_interface-curses-forms__adb.htm#ref_640_21">Lines</A></FONT>   : <b>out</b> <A HREF="terminal_interface-curses__ads.htm#ref_65_12">Line_Count</A>;
                    Columns : <b>out</b> Column_Count);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_win.3x.html">scale_form()</A></EM></FONT>
   <b>pragma</b> Inline (Scale);

   <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
   <FONT COLOR=green><EM>--  | Man page <A HREF="../man/form_hook.3x.html">form_hook.3x</A></EM></FONT>
   <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>

   <b>type</b> Form_Hook_Function <b>is</b> <b>access</b> <b>procedure</b> (Frm : <b>in</b> Form);
   <b>pragma</b> Convention (C, Form_Hook_Function);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_32"#2|</EM></FONT>
   <b>procedure</b> Set_Field_Init_Hook (<FONT COLOR=red><A NAME="ref_542_35" HREF="terminal_interface-curses-forms__adb.htm#ref_663_35">Frm</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-forms__ads.htm#ref_537_9">Form</A>;
                                  Proc : <b>in</b> Form_Hook_Function);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_hook.3x.html">set_field_init()</A></EM></FONT>
   <b>pragma</b> Inline (Set_Field_Init_Hook);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_33"#2|</EM></FONT>
   <b>procedure</b> Set_Field_Term_Hook (<FONT COLOR=red><A NAME="ref_548_35" HREF="terminal_interface-curses-forms__adb.htm#ref_679_35">Frm</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-forms__ads.htm#ref_537_9">Form</A>;
                                  Proc : <b>in</b> Form_Hook_Function);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_hook.3x.html">set_field_term()</A></EM></FONT>
   <b>pragma</b> Inline (Set_Field_Term_Hook);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_34"#2|</EM></FONT>
   <b>procedure</b> Set_Form_Init_Hook (<FONT COLOR=red><A NAME="ref_554_34" HREF="terminal_interface-curses-forms__adb.htm#ref_695_34">Frm</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-forms__ads.htm#ref_537_9">Form</A>;
                                 Proc : <b>in</b> Form_Hook_Function);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_hook.3x.html">set_form_init()</A></EM></FONT>
   <b>pragma</b> Inline (Set_Form_Init_Hook);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_35"#2|</EM></FONT>
   <b>procedure</b> Set_Form_Term_Hook (<FONT COLOR=red><A NAME="ref_560_34" HREF="terminal_interface-curses-forms__adb.htm#ref_711_34">Frm</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-forms__ads.htm#ref_537_9">Form</A>;
                                 Proc : <b>in</b> Form_Hook_Function);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_hook.3x.html">set_form_term()</A></EM></FONT>
   <b>pragma</b> Inline (Set_Form_Term_Hook);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_36"#2|</EM></FONT>
   <b>function</b> Get_Field_Init_Hook (Frm : Form) <b>return</b> Form_Hook_Function;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_hook.3x.html">field_init()</A></EM></FONT>
   <b>pragma</b> Import (C, Get_Field_Init_Hook, "field_init");

   <FONT COLOR=green><EM>--  #1A NAME="AFU_37"#2|</EM></FONT>
   <b>function</b> Get_Field_Term_Hook (Frm : Form) <b>return</b> Form_Hook_Function;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_hook.3x.html">field_term()</A></EM></FONT>
   <b>pragma</b> Import (C, Get_Field_Term_Hook, "field_term");

   <FONT COLOR=green><EM>--  #1A NAME="AFU_38"#2|</EM></FONT>
   <b>function</b> Get_Form_Init_Hook (Frm : Form) <b>return</b> Form_Hook_Function;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_hook.3x.html">form_init()</A></EM></FONT>
   <b>pragma</b> Import (C, Get_Form_Init_Hook, "form_init");

   <FONT COLOR=green><EM>--  #1A NAME="AFU_39"#2|</EM></FONT>
   <b>function</b> Get_Form_Term_Hook (Frm : Form) <b>return</b> Form_Hook_Function;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_hook.3x.html">form_term()</A></EM></FONT>
   <b>pragma</b> Import (C, Get_Form_Term_Hook, "form_term");

   <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
   <FONT COLOR=green><EM>--  | Man page <A HREF="../man/form_field.3x.html">form_field.3x</A></EM></FONT>
   <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>

   <FONT COLOR=green><EM>--  #1A NAME="AFU_40"#2|</EM></FONT>
   <b>procedure</b> Redefine (<FONT COLOR=red><A NAME="ref_590_24" HREF="terminal_interface-curses-forms__adb.htm#ref_731_24">Frm</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-forms__ads.htm#ref_133_9">Form</A>;
                       Flds : <b>in</b> Field_Array_Access);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_field.3x.html">set_form_fields()</A></EM></FONT>
   <b>pragma</b> Inline (Redefine);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_41"#2|</EM></FONT>
   <b>procedure</b> Set_Fields (<FONT COLOR=red><A NAME="ref_596_26">Frm</A></FONT>  : <b>in</b> <A HREF="terminal_interface-curses-forms__ads.htm#ref_133_9">Form</A>;
                         Flds : <b>in</b> Field_Array_Access) <b>renames</b> Redefine;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_field.3x.html">set_form_fields()</A></EM></FONT>
   <b>pragma</b> Inline (Set_Fields);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_42"#2|</EM></FONT>
   <b>function</b> Fields (<FONT COLOR=red><A NAME="ref_602_21" HREF="terminal_interface-curses-forms__adb.htm#ref_753_21">Frm</A></FONT>   : Form;
                    Index : Positive) <b>return</b> Field;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_field.3x.html">form_fields()</A></EM></FONT>
   <b>pragma</b> Inline (Fields);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_43"#2|</EM></FONT>
   <b>function</b> Field_Count (Frm : Form) <b>return</b> Natural;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_field.3x.html">field_count()</A></EM></FONT>
   <b>pragma</b> Inline (Field_Count);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_44"#2|</EM></FONT>
   <b>procedure</b> Move (<FONT COLOR=red><A NAME="ref_613_20" HREF="terminal_interface-curses-forms__adb.htm#ref_783_20">Fld</A></FONT>    : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_60_9">Field</A>;
                   <FONT COLOR=red><A NAME="ref_614_20" HREF="terminal_interface-curses-forms__adb.htm#ref_784_20">Line</A></FONT>   : <b>in</b> <A HREF="terminal_interface-curses__ads.htm#ref_61_9">Line_Position</A>;
                   Column : <b>in</b> Column_Position);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_field.3x.html">move_field()</A></EM></FONT>
   <b>pragma</b> Inline (Move);

   <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
   <FONT COLOR=green><EM>--  | Man page <A HREF="../man/form_new.3x.html">form_new.3x</A></EM></FONT>
   <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>

   <FONT COLOR=green><EM>--  #1A NAME="AFU_45"#2|</EM></FONT>
   <b>function</b> Create (Fields : Field_Array_Access) <b>return</b> Form;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_new.3x.html">new_form()</A></EM></FONT>
   <b>pragma</b> Inline (Create);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_46"#2|</EM></FONT>
   <b>function</b> New_Form (Fields : Field_Array_Access) <b>return</b> Form
     <b>renames</b> Create;
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_new.3x.html">new_form()</A></EM></FONT>
   <b>pragma</b> Inline (New_Form);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_47"#2|</EM></FONT>
   <b>procedure</b> Delete (Frm : <b>in</b> <b>out</b> Form);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_new.3x.html">free_form()</A></EM></FONT>
   <FONT COLOR=green><EM>--  Reset Frm to Null_Form</EM></FONT>
   <b>pragma</b> Inline (Delete);

   <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>
   <FONT COLOR=green><EM>--  | Man page <A HREF="../man/form_opts.3x.html">form_opts.3x</A></EM></FONT>
   <FONT COLOR=green><EM>--  |=====================================================================</EM></FONT>

   <FONT COLOR=green><EM>--  #1A NAME="AFU_48"#2|</EM></FONT>
   <b>procedure</b> Set_Options (<FONT COLOR=red><A NAME="ref_645_27" HREF="terminal_interface-curses-forms__adb.htm#ref_843_27">Frm</A></FONT>     : <b>in</b> <A HREF="terminal_interface-curses-forms__ads.htm#ref_106_9">Form</A>;
                          Options : <b>in</b> Form_Option_Set);
   <FONT COLOR=green><EM>--  AKA: <A HREF="../man/form_opts.3x.html">set_form_opts()</A></EM></FONT>
   <b>pragma</b> Inline (Set_Options);

   <FONT COLOR=green><EM>--  #1A NAME="AFU_49"#2|</EM></FONT>
   <b>procedure</b> Switch_Options (<FONT COLOR=red><A NAME="ref_651_30" HREF="terminal_interface-curses-forms__adb.htm#ref_861_30">Frm</A></FONT>     : <b>in</b> <A HREF="terminal_interface-curses-forms__ads.htm#ref_106_9">Form</A>;
                             <FONT COLOR=red><A NAME="ref_652_30" HREF="terminal_interface-curses-forms__adb.htm#ref_862_30">Options</A></FONT> : <b>in</b> Form_Opti