Exit the Routine when clicked return in TCL Script
I have a subroutine that does certain task. Since the task is repetitive It should avoid running tcl Script again and again from File --> Run --> Tcl/Tk script. So, is there a way to come out of the loop once I did all the connections.
for eg.
proc mycode {}
{
*createmarkpanel
#my working code here
}
while {0<1} {
mycode
}
Now I need to exit while loop whenever I complete desired repetitions of the tasks without any warnings or error.
<?xml version="1.0" encoding="UTF-8"?>
Find more posts tagged with
Sort by:
1 - 2 of
21
Just return a break if nothing selected
proc mycode {} {
*createmarkpanel elems 1 'select elems'
if {![hm_marklength elems 1]} {
return -code break
}
#my working code here
}