model_server/gala/src/dis_cmds.cxx
//----------------------------------------------------------------------------------------------------
// <void>  <-  <name> <text>
//
// This command will set the line wich name passed into it as a active line in spinner.
//----------------------------------------------------------------------------------------------------
  <-   
This command will set the line wich name passed into it as a active line in spinner.
< - This command will set the line wich name passed into it as a active line in spinner .
int dis_gdTextSpinSelectByText(ClientData, Tcl_Interp* interp, int argc, char *argv[]) {
    if (argc != 3) {
	Tcl_SetResult (interp, "wrong number of arguments", TCL_STATIC);
	return TCL_ERROR;
    }
    gdTextSpinner *spinner = (gdTextSpinner *)dis_findItem(interp, (vchar*) argv[1]);
    if(!spinner)  TCL_EXECERR1 ("Text spinner was not found", argv[1]);
    spinner->SelectText((unsigned char *)argv[2]);
	spinner->MarkContentDirty();
    return TCL_OK;
}
int dis_gdTextSpinSelectByText ( ClientData , Tcl_Interp * interp , int argc , char * argv [ ] ) { if ( argc != 3 ) { Tcl_SetResult ( interp , " " , TCL_STATIC ) ; return TCL_ERROR ; } gdTextSpinner * spinner = ( gdTextSpinner * ) dis_findItem ( interp , ( vchar * ) argv [ 1 ] ) ; if ( ! spinner ) TCL_EXECERR1 ( " " , argv [ 1 ] ) ; spinner -> SelectText ( ( unsigned char * ) argv [ 2 ] ) ; spinner -> MarkContentDirty ( ) ; return TCL_OK ; }
<void>  <-  <name> <text>
This command will set the line wich name passed into it as a active line in spinner.
<void > < - <name > <text > This command will set the line wich name passed into it as a active line in spinner .