我有这样的程序
...
$self->{bn1}=Wx::Button->new( $tb1, -1, 'Start');
EVT_BUTTON( $self, $self->{bn1}, \&on_click_start );
...
...
sub on_click_start
{
my( $this, $event ) = @_;
$this->{bn1}->SetLabel("Cancel");
$event->Skip;
for (...) {
long_time_operation();
last if ( Cancel_clicked );
}
}
...
我的问题是,当我单击“开始”按钮时,将调用on_click_start() ,并且我想将“开始”按钮的标签更改为Cancel,这允许我单击该按钮以中断long_time_operation()循环。
我如何为它制作正确的代码?