Warning: file_get_contents(/data/phpspider/zhask/data//catemap/2/spring/14.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何在tcl笔记本框架中显示文件内容_Tcl_Tk - Fatal编程技术网

如何在tcl笔记本框架中显示文件内容

如何在tcl笔记本框架中显示文件内容,tcl,tk,Tcl,Tk,我正在编写一个tcl笔记本代码,在第一个选项卡中显示错误,在其他选项卡中显示警告。 然而,这个错误和警告需要显示在tcl笔记本的框架区域,我尝试了几个选项,但都不起作用。 这些错误和警告需要从一些外部文件中读取 errors.txt文件如下所示 Errors DFF_X9ATH failing Error DFFX_A9th_XC is faiing 我认为最好的选择是使用文本小部件而不是标签。打包文本小部件后,可以使用insert end添加文本,将中的部分替换为代码中的相关部分 #!/usr

我正在编写一个tcl笔记本代码,在第一个选项卡中显示错误,在其他选项卡中显示警告。 然而,这个错误和警告需要显示在tcl笔记本的框架区域,我尝试了几个选项,但都不起作用。 这些错误和警告需要从一些外部文件中读取

errors.txt文件如下所示

Errors DFF_X9ATH failing Error DFFX_A9th_XC is faiing
我认为最好的选择是使用文本小部件而不是标签。打包文本小部件后,可以使用
insert end
添加文本,将
中的部分替换为代码中的相关部分

#!/usr/bin/wish

package require Tk


set file "errors.txt"
ttk::notebook .n  -width 800 -height 800
ttk::frame .n.f1; 
ttk::frame .n.f2; 
.n add .n.f1 -text "Errors"
.n add .n.f2 -text "Warnings"
pack [label .n.f1.f2 -background red -foreground white -text "Errors"]
pack [label .n.f2.f2 -background red -foreground white -text "Warnings"]
pack .n