python,Tcl

1,Python 运行tcl 脚本

test.py代码：

from Tkinter import Tcl
r=Tcl()
r.eval('package require itclx')
r.eval('cd $env(TCLSPACE)/ATOP')
r.eval('source test.tcl')

test.tcl代码： 

set b 1
while { 1 } {
 set b [ expr $b+1 ]
 if { $b == 5 } break
 puts $b
}
puts $b

2,

下面是在Python中通过Tkinter模块执行Tcl命令的示例。

 

其实主要就是五个命令