1.使用proc命令定義一個函數,并成功調用它。 之前寫函數一直調用不成功的原因時函數體中的語句沒有用分號隔開,導致出錯。
2.使用 source 命令調用一個 tcl 文件(一般 windows 下會隱藏擴張名,要更改一下設 置,使其可以直接修改)。
新建文本,輸入命令,并把擴展名改為.tcl
在控制臺用 source 命令調用新建的 tcl 文件。
2017/3/14
1.在 tcl 文件中定義兩個凼數,并用 source 命令調用它們
注意空格的使用!
2.tcl 語言中換行的使用:
在 tcl 文件中定義一個包含 if 語句的凼數,并學會使用 stringcompare 命令進行字符串 比較。
其中 stringcompare 語句比較完之后結果取邏輯非,因為默認比較字符串一致會返回 0.
2017/3/15
在一個 tcl 文件里編輯 button 組件,并用 source 命令調用它。
控制臺調用:
效果展示:
2017/3/16
Testvaiable 示例:
要注意的是 watch.label watch.value 之間是沒有空格的。
代碼解釋:
toplevel .watch #創建新的頂級窗口“watch”
label .watch.label –text “Value of\”$name\” : ” # 生成 watch 的標簽 顯示變量名(控 制臺中變量 為 county)
label .watch.value –textvariable $name #變量名后顯示變量值,如果變量值發生改 變,則其顯示的值也會隨之改變(控制臺賦值country)
grid watch.label .watch.value –pady 12 # 顯示 watch 窗口標簽 變量及變量值,窗口 大小設置為 12
控制臺調用:
效果展示:
如果取消雙斜杠,則報錯:
更改窗口大小為 80 效果:
2017/3/17
在昨天代碼中加入-font 命令,更改字體。
更改變量值的字體大。
嘗試前面字符串加黑,更改變量值字體為 Roman,并加上下劃線:
效果如下:
2017/3/21
做一個可以橫向 豎向 拉伸 收縮的窗口 指令:WM
雙擊該 tcl 文件,窗口效果:
主要代碼:
set f . wm title $f "WM_TEST SMART BOY" wm geometry $f 1000x1000 wm maxsize $f 1000 1000 wm minsize $f 200 200
注意的是 wm maxsize 的值是可以設的 wm geometry 的值大的,例如:
set f . wm title $f "WM_TEST SMART BOY" wm geometry $f 1000x1000 wm maxsize $f 2000 2000 wm minsize $f 200 200
全部資料51hei下載地址:
TCL語言學習筆記.pdf
(751.83 KB, 下載次數: 7)
2018-2-8 20:11 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
|