2015-09-26 36 views

回答

0

RTFM !!!

原来任何一个微件的属性可以与“配置”方法而改变:

... 
$btn = $frame->$new_ttk__button(-text => "hello", -command => \&say_hello()); 
Tkx::MainLoop(); 

sub somefunc_invoked_by_some_other_button { 
    $btn->configure(-text => "goodbye", -command => \&say_bye()); 
} 
相关问题