Ich versuche Visibility- oder Destroy-Events eines TkToplevel-Fensters
binden - leider bisher ohne jeden Erfolg:
1 | top = TkToplevel.new(root)
|
2 | top.bind('<Visibility>', proc { |s|
|
3 | top.destroy
|
4 | $lbLock = 0
|
5 | }, "%s")
|
Hier der Versuch für Destroy:
1 | top = TkToplevel.new(root)
|
2 | top.bind('<Destroy>', proc {
|
3 | top.destroy
|
4 | $lbLock = 0
|
5 | })
|
Destroy sollte beim Schließen von top feuern, Visibility bei Änderung
der Sichtbarkeit - beide tun es nicht.
Warum?
ListboxSelect-Events funktionieren dagegen prima:
1 | w = TkListbox.new(top) do
|
2 | selectmode 'browse'
|
3 | pack
|
4 | end
|
5 | ['1', '2', '3'].each do |p|
|
6 | w.insert('end', p)
|
7 | end
|
8 | w.bind('<ListboxSelect>', proc {
|
9 | updateShellCommand
|
10 | })
|