Hallo
ich bin ein neuling in der perlprogrammierung.
kann mir jemand erklären, wie mann in TK den Inhalt eines frames löschen kann ?
vielen dank im vorraus.
User since
2006-05-20
533
Artikel
BenutzerIn
Hihi =)
#!/usr/bin/perl -w
use strict;
use Tk;
my $mw = tkinit();
my $frame = $mw->Frame()->pack;
for (0..3) {
$frame->Button(-text => $_)->pack(-side => 'top');
}
$frame->Button(-text => 'clear', -command => [\&clear_frame])->pack(-side => 'top');
MainLoop;
sub clear_frame {
$_->destroy() for ($frame->children);
}
$frame->children gibt dir die Kinder des Frames als Liste zurueck, welche du dann durchlaufen und loeschen kannst =)
MfG
Pörl.
User since
2007-03-26
47
Artikel
BenutzerIn
Hallo,
falls du diese widgets zu einem späteren Zeitpunkt noch einmal brauchst, solltest du sie aber nicht löschen, sondern verbergen.
Dazu gibt es packForget etc.(analog auch für die anderen g.m.).
Grüße,