$f2->Table( -takefocus => 0, -highlightcolor => $bgColor, -relief => 'groove', -borderwidth => 2, -columns => 3, -fixedrows => 1, -fixedcolumns => 2, -scrollbars => 'se')->pack... #### 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;