Gap*_*oos 5 installer uninstall tcl
我正在使用InstallJammer来创建我的应用程序.我想在继续卸载过程之前检查应用程序是否正在运行.
set program <%Company%><%AppName%>.exe
set pids [twapi::get_process_ids -name $program]
foreach pid $pids {
catch {twapi::end_process $pid -force}
}
Run Code Online (Sandbox Code Playgroud)
上面给出的是我试过的TCL脚本.但脚本不返回任何值.怎么解决这个.
我假设您正在使用执行脚本条件,而仅使用脚本条件可能会更容易
如果使用脚本条件,只需使用kostix给出的expr即可:
[llength [twapi::get_process_ids -name <%Company%><%AppName%>.exe]] > 0
Run Code Online (Sandbox Code Playgroud)
如果您确实必须使用执行脚本条件,那么只需将所有内容包装在expr {
and}
中,您就会得到与脚本条件相同的结果(或者:脚本条件只是一个执行脚本条件,expr {
在开头和}
结尾)。
expr {[llength [twapi::get_process_ids -name <%Company%><%AppName%>.exe]] > 0}
Run Code Online (Sandbox Code Playgroud)