1

在 Tcl/Tk 包装应用程序中实例化 VB6 ActiveX 控件的最常用方法是什么。

此设置是否存在性能问题,即围绕 GDI 句柄?

4

1 回答 1

3
  1. 下载 ActiveTcl 发行版并安装它。
  2. 参考The TclTk wiki 为 tcl 下载 tcom 库
  3. tcom README 指示将 \lib 文件夹中的 tcom 文件夹从 zip 文件复制到 C:\Tcl\lib 以安装 tcom 库。

现在创建一个带有 .tcl 扩展名的文本文件,其中包含以下内容:

# This demo of calling the Fire method on the MyControl VB6 ActiveX control
puts "Hello World";
package require tcom;
set myinstance [::tcom::ref createobject "MyKit.MyControl"];
$myinstance Fire;

双击 .tcl 文件以使用 wish 打开它。

另一种选择是使用“Open Tcl”又名 optcl,它显然与 tcom 不同,它支持在基于 Tk 的应用程序中嵌入可视 ActiveX 组件。安装类似于 tcom(将 optcl 文件夹复制到 C:\tcl\lib 文件夹中。

这是代码的 optcl 版本:

#load optcl
package require optcl
set myinstance [optcl::new MyKit.MyControl];
$myinstance Fire;
于 2010-04-08T12:01:26.260 回答