Once I have printed labels to the screen,
and I have inserted my notes of the day.
to this calendar program.
How can I delete old labels, when I scroll
to he next month now I see old months and
I read my notes of the day from files here
and now it shows, the "data" what are
an other month's files.
When I select an other month I want that opens
like a first time.
labels come from calendar 1-31,
from foreach loop
$w = $t->Label(-text => "$label", -relief => 'groove', -width => 30,
-background=>gold);
$t->windowCreate('end', ,-window => $w);
$w = $t->Entry(-width => 85, -background=> white,-textvariable =>
\$info{$apu});
$t->windowCreate('end', -window => $w);
$t->insert('end', "\n");
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
