1.调用别人的lib.先将别人的文件保存到C:\Tcl\lib
在自己的脚本中添加 package require xxx,如果不成功,查看库文件中的pkg_Index.tcl,查看文件中ifneeded后面的参数,即库文件名称。
2.自己创建库,先创建一个文件夹,再里面创建tcl文件,例如Helloword.tcl文件
namespace eval ::HelloWord {
namespace export MyProcedure
set version 1.0
set MyDescription "HelloWord"
variable home [file join [pwd] [file dirname [info script]]]
}
package provide HelloWord $HelloWord::version
package require Tcl 8.0
puts $::HelloWord::home
#pkg_mkIndex 文件目录,文件名称.tcl
#pkg_mkIndex . HelloWorld.tcl
#package provide fun 1.0),provide提供的名称和版本。
然后,使用交互界面(tclsh)执行pkg_mkIndex 目录 文件.tcl 命令去生成库文件,查看pkg_Index.tcl文件是否含有 package provide fun 1.0),provide提供的名称和版本。
3添加自己的library库路径
lappend auto_path "C:\Tcl\Helloworld"
puts $auto_path
#myLib.tcl
package provide myLib 1.0
#package code.
#In an application or another package
package require myLib