在Tcl Tk8.6上找不到包BLT

在Tcl Tk8.6上找不到包BLT,tcl,tk,Tcl,Tk,我在让BLT与Tcl/TK一起工作时遇到了一个问题。我为TCL/TK安装了BLT库,但当我尝试运行TCL程序来绘制图形时,它总是给我一个错误,说“找不到包BLT”。在我的计划中,我已经包括: package require BLT 我还将BLT部分附加到windows操作系统32位上的环境变量中,但它仍然不起作用 下面是我写的一个小脚本: #!/usr/bin/wish lappend auto_path "C:/Tcl/Tcl/lib" package require BLT #put

我在让BLT与Tcl/TK一起工作时遇到了一个问题。我为TCL/TK安装了BLT库,但当我尝试运行TCL程序来绘制图形时,它总是给我一个错误,说“找不到包BLT”。在我的计划中,我已经包括:

package require BLT
我还将BLT部分附加到windows操作系统32位上的环境变量中,但它仍然不起作用

下面是我写的一个小脚本:

#!/usr/bin/wish

lappend auto_path "C:/Tcl/Tcl/lib"

package require BLT

#puts "Testing"

我需要绘制一个交互式图形。请问我需要做什么?

您知道将BLT安装到哪里吗?很抱歉,我的Windows计算机目前还没有启动。@Donal,是的,我知道我在哪里安装了BLT。这是我在lappend auto_路径“C:/Tcl/Tcl/lib”中指定的路径。在过去的几天里,我一直在备货,而且很紧急。请帮忙!。该目录中的
pkgIndex.tcl
的内容是什么?在提到BLT的目录的一个子目录中是否有一个
pkgIndex.tcl
?proc LoadBLT{version dir}{set prefix”“set suffix[info sharedlibextension]regsub{.}$version{version no#dots#确定是加载完整的BLT库还是加载“lite”仅限tcl版本。如果{[info commands tk]==“tk”}{set name${prefix}BLT${version}{nou dots}${suffix}}否则{set name${prefix}BLTlite${version}{nou dots}${suffix}}}全局tcl_平台如果{$tcl(平台}==“unix”}{set library[文件存在$library]}{#尝试父目录。设置库[file join[file dirname$dir]$name]}如果{![file exists$library]}{#默认为编译时生成的路径。设置库[file join“C:/Program Files/Tcl/lib”$name]}否则{set library$name}加载$library BLT}设置版本“2.4”包ifneedblt$version[列表加载BLT$version$dir]#包索引文件结尾