Lines Matching defs:demo_forms

52    package BS is new Ada.Strings.Bounded.Generic_Bounded_Length (80);
54    type myptr is access Integer;
62    package StringData is new
65    function edit_secure (me : Field; c_in : Key_Code) return Key_Code;
66    function form_virtualize (f : Form; w : Window) return Key_Code;
67    function my_form_driver (f : Form; c : Key_Code) return Boolean;
68    function make_label (frow  : Line_Position;
71    function make_field (frow   : Line_Position;
76    procedure display_form (f : Form);
77    procedure erase_form (f : Form);
85    function edit_secure (me : Field; c_in : Key_Code) return Key_Code is
160    mode : Key_Code := REQ_INS_MODE;
162    function form_virtualize (f : Form; w : Window) return Key_Code is
318    function my_form_driver (f : Form; c : Key_Code) return Boolean is
331    function make_label (frow  : Line_Position;
345    function make_field (frow   : Line_Position;
369    procedure display_form (f : Form) is
409    procedure erase_form (f : Form) is
420    finished : Boolean := False;
421    f : constant Field_Array_Access := new Field_Array (1 .. 12);
422    secure : Field;
423    myform : Form;
424    w : Window;
425    c : Key_Code;
426    result : Driver_Result;