Thread Button bei event ausgrauen/disablen
(11 answers)
Opened by Gast at 2007-12-13 16:20
Thx für das Beispiel, allerdings hab ich immernoch ein kleines Prob.
Wenn ich ListboxSelect benutze, dann kann ich meine buttons "aktivieren", aber ich finde keinen Event mit dem ich das Gegenteil bewirken könnte. Also wenn eben nichts mehr selektiert ist, bzw die Listbox garnicht angeklickt ist. Ich habs schon mit <<FocusIn>> und <<FocusOut>> probiert, aber da passiert dann garnix :( Hier der Code, den ich verwendet habe: Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 $textfield_listing->bind('<<ListboxSelect>>', sub { if ($textfield_listing->curselection()) { $button_stop->configure( -state => "normal"); $button_log->configure( -state => "normal"); $button_info->configure( -state => "normal"); } # ein ListboxDeselect wäre nice, hab aber nichts dazu gefunden :( } ); Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 $textfield_listing->bind('<<FocusIn>>', sub { if ($textfield_listing->curselection()) { $button_stop->configure( -state => "normal"); $button_log->configure( -state => "normal"); $button_info->configure( -state => "normal"); } } ); $textfield_listing->bind('<<FocusOut>>', sub { $button_stop->configure( -state => "disabled"); $button_log->configure( -state => "disabled"); $button_info->configure( -state => "disabled"); } ); Gibt es vieleicht eine Liste/Tabelle mit allen Events für die jeweiligen Widgets? in den Perldocs (Tk::bind und Tk::event) gibt es die nicht. |