TCL剪贴板搞定

Question

我正在尝试使用TCL命令捕获文件到剪贴板的名称和路径。 我意识到它只适用于一般文本而不是文件。

谢谢， 菲利普

这是我的TCL示例：

$ cat a
1:12
34 
56
$ awk -F: 'NF==2{line=$1} NF==1{$0=line FS $0}1' a
1:12
1:34 
1:56

Answer 1

这可能比它需要的更复杂。尝试这样的事情：

pack [label .foo -textvariable myVar]
bind . <Control-v> {set myVar [clipboard get]}
bind . <Control-c> {clipboard clear ; clipboard append $myVar}
set myVar foobar

我已经改变了 Control-C 和 Control-V 的意义，因为从 Control-V 和 Control-C 上的剪贴板。

这段代码可能没有你想要的，但是（至少对我来说）你想做什么有点不清楚。绝对可以通过剪贴板复制文件名和路径。以上代码是否为您提供了解决方法？如果没有，如果你澄清一下你的问题会更容易帮助。

评论后更新的答案

如果您指的是文本小部件，您已经可以使用 Control-V 将所有内容粘贴到剪贴板中，则该绑定是标准的。 Tcl无法帮助您使用资源管理器功能，但是如果您 Shift - 右键单击​​该文件，您应该获得“复制为路径”选项，它可以执行您想要的操作（至少在Windows 7及更高版本中） 。请注意，路径是使用附加的双引号复制的（如"C:\foo\bar\baz.txt"中所示）;你可能想要修剪它们。