[ Tcl ] 非阻塞模式启动外部程序，并接收返回值的方法

本文主要是介绍[ Tcl ] 非阻塞模式启动外部程序，并接收返回值的方法，对大家解决编程问题具有一定的参考价值，需要的程序猿们随着小编来一起学习吧！

https://www.cnblogs.com/yeungchie/

Callback 函数

proc Callback { handle } {
    variable line
    if { [catch {gets $handle line}] || [chan eof $handle]} {
        # 这里 gets 当获取失败，或者遇到 End Of File 时，关闭管道
        catch {close $handle}
    } else {
        puts "$line"
        flush stdout
    }
}

先创建一个函数用来接受返回值

启动外部程序

set fh [open "| python SyncViewConfigure.py" r]

这里运行外部程序，并返回 $fh

设置 $fh 为非阻塞模式

chan configure $fh -blocking 0

注册事件触发 Callback 函数

chan event $fh readable [list Callback $fh]

函数输入值为 $fh

这篇关于[ Tcl ] 非阻塞模式启动外部程序，并接收返回值的方法的文章就介绍到这儿，希望我们推荐的文章对大家有所帮助，也希望大家多多支持为之网！