Thread Alle Labels neu generieren (9 answers)
Opened by DrMaex at 2012-06-26 19:03

GUIfreund
 2012-06-28 15:02
#159449 #159449
User since
2011-08-08
559 Artikel
BenutzerIn
[default_avatar]
So kann das nicht gehen. Deine Textvariable ist der Skalar $map->{'de'}->{btn_click_me}. Der ändert nie seinen Wert. Aber du warst schon nahe dran. Hier die Änderungen zu deinem Kode:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
........
my $lang = 'de';   # default-Sprache
my $btntext;
update_window();   # Texte in default-Sprache
........
my $mybutton = $mw->Button(
    -textvariable => \$btntext,
)->pack();
........
sub update_window {   # Texte in gewählter Sprache
    $btntext = $map->{$lang}->{btn_click_me};
} # /update_window
Gruß
GUIfreund

View full thread Alle Labels neu generieren