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