為增強ATOP程序與tcl/tk 的互動性, 探討使用python編寫ATOP程序后，能夠有效運行現(xiàn)有的TCL腳本功能，增強ATOP程序的功能。

TCL (最早稱為“工具命令語言”"Tool Command Language",但是現(xiàn)在已經(jīng)不是這個含義，不過我們?nèi)匀环Q呼它為TCL)是一種 腳本語言。 由John Ousterhout創(chuàng)建。 TCL很好學(xué)，功能很強大。TCL經(jīng)常被用于快速原型開發(fā)，腳本編程， GUI和測試等方面。TCL念作“踢叩” "tickle"。

Tcl的特性包括：（推薦學(xué)習(xí)：Python視頻教程）

* 任何東西都是一條命令，包括語法結(jié)構(gòu)(for, if等)。

* 任何事物都可以重新定義和重載。

* 所有的數(shù)據(jù)類型都可以看作字符串。

* 語法規(guī)則相當簡單

* 提供事件驅(qū)動給Socket和文件?；跁r間或者用戶定義的事件也可以。

* 動態(tài)的域定義。

* 很容易用C, C++,或者Java擴展。

* 解釋語言，代碼能夠動態(tài)的改變。

* 完全的Unicode支持。

* 平臺無關(guān)。Win32, UNIX, Mac上都可以跑。

* 和Windows的GUI緊密集成。 Tk

* 代碼緊湊，易于維護。

TCL本身不提供面向?qū)ο蟮闹С?。但是語言本身很容易擴展到支持面向?qū)ο蟆ＴS多C語言擴展都提供面向?qū)ο竽芰?，包括XOTcl, Incr Tcl等。另外SNIT擴展本身就是用TCL寫的。

Python 執(zhí)行TCL功能有兩種：

1. 進程內(nèi)執(zhí)行（內(nèi)含TCL解析器）使用eval 命令實現(xiàn)

2. 進程外執(zhí)行 調(diào)用tclsh/wish.exe 執(zhí)行，該方式與目前ATOP 方式一致。

Python 運行tcl 腳本

From Tkinter import Tcl r=Tcl() r.eval('package require itclx') r.eval('cd $env(TCLSPACE)/ATOP') r.eval('source lib/ct/ctCaseDv.tcl') r.eval('source lib/ct/ctCaseDv.tcl')

使用eval 命令執(zhí)行tcl腳本。

作用：

1) 可以將常用的 操作，如 Excel 轉(zhuǎn)tcl, 刷新XML目錄樹，等功能集成到ATOP

2) 加強GUI 和TCL 之間的溝通。