$Canvas->delete('all');
zeichne_objektart1($_) for (0..$n1);
zeichne_objektart2($_) for (0..$n2);
zeichne_objektart3($_) for (0..$n3);
...