TABLE OF CONTENTS

UUI/UUI.Process_Question_Command [ Commands ]

[ Top ] [ UUI ] [ Commands ]

FUNCTION

 Process question from dialog when the player answer Yes there

SOURCE

   function Process_Question_Command
     (Client_Data: Integer; Interp: Tcl.Tcl_Interp; Argc: Interfaces.C.int;
      Argv: CArgv.Chars_Ptr_Ptr) return Interfaces.C.int with
      Convention => C;

PARAMETERS

 ClientData - Custom data send to the command. Unused
 Interp     - Tcl interpreter in which command was executed.
 Argc       - Number of arguments passed to the command. Unused
 Argv       - Values of arguments passed to the command.

RESULT

 This function always return TCL_OK

COMMANDS

 ProcessQuestion answer
 Answer is the answer set for the selected question

UUI/UUI.Set_Scrollbar_Bindings_Command [ Commands ]

[ Top ] [ UUI ] [ Commands ]

FUNCTION

 Assign scrolling events with mouse wheel to the selected vertical
 scrollbar from the selected widget

SOURCE

   function Set_Scrollbar_Bindings_Command
     (Client_Data: Integer; Interp: Tcl.Tcl_Interp; Argc: Interfaces.C.int;
      Argv: CArgv.Chars_Ptr_Ptr) return Interfaces.C.int with
      Convention => C;

PARAMETERS

 ClientData - Custom data send to the command. Unused
 Interp     - Tcl interpreter in which command was executed. Unused
 Argc       - Number of arguments passed to the command. Unused
 Argv       - Values of arguments passed to the command.

RESULT

 This function always return TCL_OK

COMMANDS

 SetScrollbarBindings widget scrollbar
 Widget is the widget from which events will be fired, scrollbar is
 Ttk::scrollbar which to which bindings will be added

UUI/UUI.Set_Text_Variable_Command [ Commands ]

[ Top ] [ UUI ] [ Commands ]

FUNCTION

 Set the selected Tcl text variable and the proper the Ada its equivalent

SOURCE

   function Set_Text_Variable_Command
     (Client_Data: Integer; Interp: Tcl.Tcl_Interp; Argc: Interfaces.C.int;
      Argv: CArgv.Chars_Ptr_Ptr) return Interfaces.C.int with
      Convention => C;

PARAMETERS

 ClientData - Custom data send to the command. Unused
 Interp     - Tcl interpreter in which command was executed. Unused
 Argc       - Number of arguments passed to the command. Unused
 Argv       - Values of arguments passed to the command.

RESULT

 This function always return TCL_OK

COMMANDS

 SetTextVariable variablename
 Variablename is the name of variable to set