TCL_EvalStr - Evaluate a string whithin the tcl/tk interpreter
TK_EvalStr - Evaluate a string whithin the tcl/tk interpreter (obsolete)
This routine allows to evaluate tcl/tk instructions with the tcl/tk interpreter launched with Scilab (when the interp parameter is not given), or in a slave interpreter.
When tcl/tk support is enabled in Scilab, you can evaluate tcl/tk expression from Scilab interpreter. In fact, Scilab launches a main tcl/tk interpreter. The Scilab instruction TCL_EvalStr can be used to evaluate expressions without having to write tcl/tk instructions in a separated file (this capability is provided by TCL_EvalFile ).
//with one call TCL_EvalStr(["toplevel .foo1" "label .foo1.l -text ""TK married Scilab !!!""" "pack .foo1.l" "button .foo1.b -text close -command {destroy .foo1}" "pack .foo1.b"]) //step by step (debugging) TCL_EvalStr("toplevel .foo2"); // creates a toplevel TK window. TCL_EvalStr("label .foo2.l -text ""TK married Scilab !!!"""); // create a static label TCL_EvalStr("pack .foo2.l"); // pack the label widget. It appears on the screen. text="button .foo2.b -text close -command {destroy .foo2}"; TCL_EvalStr(text); TCL_EvalStr("pack .foo2.b"); //kill the windows by program TCL_EvalStr("destroy .foo1"); TCL_EvalStr("destroy .foo2"); //with one call, and in a slave interpreter TCL_CreateSlave('TCLSlave'); TCL_EvalStr('set test ""in Slave TCL Interp""','TCLSlave'); TCL_GetVar('test','TCLSlave') TCL_DeleteInterp('TCLSlave')
ScilabEval , TCL_EvalFile , TCL_GetVar , TCL_SetVar , TCL_ExistVar , TCL_UnsetVar , TCL_UpVar ,
Allan CORNET