工具命令语言是John Ousterhout发明的一种方法,可以很容易地编写用于配置EDA工具的小语言,但它已经远远超出了那些简单的开头,成为具有内置异步I / O和Unicode字符串的通用脚本语言同时支持面向对象编程和协同程序等范例。
是否可以删除 tkinter.Text 小部件与其内部标签的背景颜色之间的边框?我将边框宽度和突出显示厚度都设置为0,但边框是st...
Tkinter 的带有 wrap=none 的文本不能水平滚动超过可见行的宽度
当我注意到如果长行不可见时,ScrolledText 小部件的水平滚动条将消失时,我一直在修改 PAGE 的滚动小部件的实现。结果...
Tclkit/Starkit 在 ubuntu 上带有共享库
在我的 tcl 工具中,我使用文件 .so + pkgIndex.tcl 形式的二进制共享库,然后使用 package require 加载实际的包。它在我的机器上运行得很好,但是当我尝试打包时我......
问题是 - 我有 tcllib 中一些软件包的本地副本,并且我在 /usr/lib/tcllib2.0 中全局安装了 tcllib。如何确保我的程序加载本地包而不是包...
我想将我的 tcl 程序包装成单个可执行文件,我找到了 tclkit 和 starkit。 我从这里下载了 tclkit: http://kitcreator.rkeene.org/kitcreator 我使用以下选项构建了它:Linux/
假设我有一个像这样的字符串: 设置str“AAA B C DFG 142 56” 现在我想得到一个列表,如下所示: {AAA B C DFG 142 56} 为此,我想使用 split 函数,但在这种情况下...
我对限制文本 Tk 小部件的大小调整有疑问。我有以下代码,其中两个文本小部件彼此排列在一起。问题是当我调整包含 &...
提取零件的最大轮廓值[Hyperview 中的 TCL scipt 集成]
我目前正在定制一个宏,以便显示以下结果的“查询”(组件 ID、组件名称、轮廓(应力/应变))。最终目标是出口这些
我正在尝试创建一个列出数组所有元素的过程: 这是过程: proc array_values {array_input} { upvar $array_input arr foreach name [lsort [数组名称 arr]] {puts "a...
我想知道expect脚本中父进程的父进程ID我该怎么做。 我曾经尝试使用并收到此错误 [sesiv@itselm-lx4151 ~]$ 无效命令名称“id” 同时
我有一个如下所述的文件 文件1 模块1(dd ddd) jdjd ikdnd kdndn didkdn; jdjdjl kdkdk kdkd lkd; 安 {“加载 DR”} ; V { REST_TMS=1 ; 休息_TDI = 0 REST_TCK=1; ...
我有一个格式为的输入文件 https://regex101.com/r/4VAKoQ/1 我已经编写了 TCL 代码来从“其他结束路径”部分中提取一些值,以便它应该在以下格式中输出...
ttkthemes 应用于 root 时不会为整个窗口设置主题
我在 ttkthemes 中尝试过的主题都不会为整个窗口设置主题。我将主题应用于根/自身,它只会主题文本/按钮 截图: 我期待着窗口填满......
当我使用zlib pushgunzip逐行读取一个大的gzip文件时,tell函数总是返回-1而不是当前访问位置。 有没有办法在阅读时获取访问位置
使用 tcl tdom 将 <br> 标签更改为 <?linebreak?>
我有一个 html 格式的输入字符串,需要对其进行解析并写入 DITA 兼容的 XML。 输入: 后面有换行符的行后面有两个换行符的行L... 我有一个 html 输入字符串,需要解析它并将其写入 DITA 兼容的 XML。 输入: <p>Line with following newline<br>Line with two following newlines<br><br>Line with no following newline</p> 所需输出: <p>Line with following newline<?linebreak?>Line with two following newlines<?linebreak?><?linebreak?>Line with no following newline</p> package require tdom set xml {<p>Line with following newline<br>Line with two following newlines<br><br>Line with no following newline</p>} puts "Input:" puts "$xml" set doc [dom parse -html -keepEmpties $xml] set root [$doc documentElement] foreach node [$root getElementsByTagName br] { $node delete #$node appendXML "<?linebreak?>" } puts "Output:" puts [$doc asXML -indent none] 如果我取消注释#$node appendXML "<?linebreak?>",脚本就会失败。 我是 tdom 的新手,但不是 tcl 的新手。 或者......也许有人对如何在 XML 中保留换行符有不同的想法,特别是 DITA。 一旦您在 tdom 节点上调用 delete,它就不再存在,因此如果您随后尝试使用它,自然会收到错误。 一种方法:对于每个 br 节点,创建一个新的处理指令节点,然后用它替换 br 节点(这首先需要获取该节点的父节点)。你的循环将如下所示: foreach node [$root getElementsByTagName br] { set lb [$doc createProcessingInstruction linebreak ""] [$node parentNode] replaceChild $lb $node # replaceChild moves the old node to the document fragment list; # just get rid of it completely since we're not going to reuse it $node delete } 修改后的程序打印出来 Input: <p>Line with following newline<br>Line with two following newlines<br><br>Line with no following newline</p> Output: <html><p>Line with following newline<?linebreak ?>Line with two following newlines<?linebreak ?><?linebreak ?>Line with no following newline</p></html>
我有以下简化代码: 设置 getevent [exec“显示运行配置 | 部分 UPDATESCRIPTS”] 设置 geteventsplit [分割 $getevent " ”] foreach 条目 $geteventsplit { 我...
TCL 有没有办法在 while gets 语句中模式匹配一行?
这个 TCL 应该解析文件直到找到模式。然后会有数量可变的某种序言行,它们具有我想跳过的不同的独特模式,并且......
在 tcl 8.6.6 中寻找等效的 Tcl_FileObjCmd 函数
我正在尝试从 tcl 8.4 迁移到 tcl 8.6。在我的项目中,使用了函数 **Tcl_FileObjCmd **,但是该函数在 tcl 8.6.6 中不可用。我找不到它相当于
我发现在 tkinter 中,''、''、''、'' 不会将 ttk.Treeview 小部件滚动为 ''、''、'<
如何从命令行请求有关 Tcl 主题的帮助? Tcl 是否有一个本地文档提取器/生成器工具,可以用来快速获取有关 Tcl 命令或命令的信息...