2011-04-08 70 views
0

我建立在Perl TK GUI和我做这应该清除文本框的内容复位按钮:这是给一个错误,说这在Perl结算文本框元素TK

use Tk; 
use Tk::Text ; 
............ 
sub reset9 { 
    $txt2-> delete('1.0','end'); 
} 

无法调用方法删除未定义的值。我检查了所有的语法错误,并使用Windows的Strawberry Perl。

回答

0

你的子程序不知道$ txt2是什么。如果$ txt2在另一个子例程中定义,那么在它之前添加单词“our”(而不是使用my)。

our $txt2 = ... 

这应该做的伎俩,你

0

你可以试试: $ txt2->删除( '0.0', '端');