for (my $n = 0; $n < $Maxobj; $n++ ){
    my $canvas =  $CstObj->{'matrix'}->windowDelete("$n,1");
  } ## should delete embedded widgets in canvas track too (I hope).