我有一些小代码可以将文本追加到剪贴板。该代码在具有TCL / TK 8.6的LINUX / X11下运行,我想在窗口侧看到文本。因此,我有免费的Clipboard Viewer 3.0。
第一个“剪贴板附加”功能按预期工作。没有立即看到第二个和其他任何一个。我必须在Linux / X11和Windows之间改变重点。 在LINUX / X11中(即在xterm中)进行另一种选择时,它似乎在显示剪贴板,并且“剪贴板清除”无效。 有提示吗?
package require Tk
proc cmd {} {
set text [string repeat x 128]
set text [string repeat $text\n $::counter]
set ::buttontext "$::counter [string length $text] "
clipboard clear
clipboard append $text
incr ::counter
}
incr ::counter
set ::buttontext "start"
button .b -textvariable ::buttontext -command cmd
grid .b
答案 0 :(得分:1)
添加选择内容也可以解决问题:
...
selection clear
clipboard clear
clipboard append $text
...