2011年9月17日
sharedlibextension
摘要： set pattern libtreectrl*[info sharedlibextension]*libtreectrl*.so* 阅读全文
posted @ 2011-09-17 23:21 greencolor 阅读(115) 评论(0) 推荐(0) 编辑
Get full pathname to the file
摘要： set ScriptDir [file normalize [file dirname [info script]]] 阅读全文
posted @ 2011-09-17 22:39 greencolor 阅读(111) 评论(0) 推荐(0) 编辑
check window system
摘要： switch -- [tk windowingsystem] { aqua { set thisPlatform "macosx" } classic { set thisPlatform "macintosh" } win32 { set thisPlatform "windows" } x11 { set thisPlatform "unix" }} 阅读全文
posted @ 2011-09-17 22:23 greencolor 阅读(133) 评论(0) 推荐(0) 编辑