Schrift
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
[thread]5086[/thread]

Neue Frage zu Tk und Buttons!

Leser: 1


<< >> 2 Einträge, 1 Seite
renee
 2005-09-06 11:20
#44611 #44611
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Entweder kannst Du es so machen:
Code: (dl )
1
2
3
4
if($schritt == 2)  {
$button->destroy();
my $new_btn = $mw->Button(...)->pack();
}


oder:
Code: (dl )
1
2
3
if($schritt == 2){
$button->configure(-text => 'neuer Text', -command => \&newCommand);
}
\n\n

<!--EDIT|renee|1125991257-->
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
Weman
 2005-09-06 11:08
#44612 #44612
User since
2005-08-10
17 Artikel
BenutzerIn
[default_avatar]
Hallo nochmal,

ich erstelle mit Perl Tk Buttons! Jetzt möchte ich wenn ein Button drückt wird das dieser wieder verschwindet und an dieser Stelle ein neuer Button entsteht.

Wie macht man denn sowas in Perl/Tk??? Kann ich den Button durch eine if-Abfrage anzeigen lassen? Z.B.

If ($schritt == 2){

Dann lasse Button entstehen........

}

Vielen Dank!
<< >> 2 Einträge, 1 Seite



View all threads created 2005-09-06 11:20.