Perl Tk / Tcl:小部件回调可以采用参数

时间:2015-09-29 01:59:21

标签: tcl tk tkx

是否可以创建一个按钮,例如,其回调是否带有参数?

e.g。

button(-text => 'Row1', -command => \&do_something_with('Row 1'));

在测试程序上尝试过,但似乎没有。如果是这种情况,还有其他方法可以按照上面的例子做我想做的事吗?

我的程序需要创建按钮,但事先不知道该数字(取决于.cfg文件)。

2 个答案:

答案 0 :(得分:1)

您可能需要一个匿名子例程,该子例程使用至少一个参数调用您的子例程。

C:\>npm start
npm ERR! Windows_NT 6.3.9600
npm ERR! argv "C:\\Program Files\\nodejs\\\\node.exe" "C:\\ProgramFiles\\nodejs\\node_modules\\npm\\bin\\npm-cli.js" "start"
npm ERR! node v0.12.7
npm ERR! npm  v2.11.3
npm ERR! path C:\package.json
npm ERR! code ENOENT
npm ERR! errno -4058

npm ERR! enoent ENOENT, open 'C:\package.json'
npm ERR! enoent This is most likely not a problem with npm itself
npm ERR! enoent and is related to npm not being able to find a file.
npm ERR! enoent

npm ERR! Please include the following file with any support request:
npm ERR!     C:\npm-debug.log

答案 1 :(得分:0)

我没有清楚地理解你的问题,但从我所理解的是:

equals() and hashCode()

这里RowOperation是一个带有3个参数的proc,假设是row,abc,xyz。 在那个过程中,你可以做到这一点。