TCL脚本接收DDE

Question

我想创建一个TCL应用程序，它通过DDE接收数据并在TK小部件上显示数据。目前，我正在开发一个愿望控制台上的应用程序。我有一个将DDE数据发送到Excel的应用程序，我认为它正在向我的TCL控制台发送数据(该应用程序不会给出错误消息)，但我看不到结果:-(在我过去编写的TCL内容中，我已经从DDE中‘推’和‘拉’数据，我的应用程序从来没有接收过‘推’。我应该在我的控制台中寻找什么？

TIA标记

Answer 1

您要找的电话是dde servername。您可以使用it的-handler选项为服务名称TclEval和具有您选择的名称的主题安装一个处理程序。处理程序只接受一个参数。

package require dde
dde servername -handler MyDdeHandler "MySampleTopic"
proc MyDdeHandler {request} {
    puts "The request was '$request'"
    return "this is an example response"
}

请注意，另一端仍然必须与正确的服务/主题进行对话。

有用的链接：

• TIP #120
• Tcler's Wiki