my $AktRows = $table->totalRows; my $AktCols = $table->totalColumns; my $AnzActivities = keys %AktActivityRec; if( $AnzActivities < ($AktRows-1) ) { for(my $row=($AnzActivities+1); $row < $AktRows; $row++) { for(my $col=0; $col < $AktCols; $col++) { my $widget = $table->get($row, $col); if ($widget) { $table->LostSlave($widget); $widget->destroy(); } } } } $table->update;