Thread Frage zu hlist (7 answers)
Opened by zoolander at 2005-06-08 18:27

Strat
 2005-06-16 16:11
#44061 #44061
User since
2003-08-04
5246 Artikel
ModeratorIn
[Homepage] [default_avatar]
In Tk::HList gibt es die Bindung
Code: (dl )
$mw->bind($class, '<ButtonPress-1>', \&Button1)

schau dir mal den Callback Button1 an; in der wird irgendwo $widget->GetNearest ausgewertet, und wenn da keine Rueckgabe stattfindet, wird Button1 mit return verlassen. Das muesste die Stelle sein, wo du feststellen kannst, ob auf einen Eintrag oder ins Nirvana geklickt wurde.

Also selbst ein Binding auf das Widget machen, eine eigene Subroutine angeben, und dort das Zeug von Tk::HList::Button1 reinkopieren und erweitern. Eventuell koennte es auch reichen, die Methode Button1 in deinem Programm zu ueberschreiben (aber der andere Weg ist besser, weil er nicht global ist)

du koenntest dir die Subroutine Button1 in Tk/HList.pm ueberschreiben (besser nicht im Modul selbst, sondern in deinem Programm), aber das hat halt die Gefahr, dass dann diese Aenderung global ist\n\n

<!--EDIT|Strat|1118923995-->
perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/

View full thread Frage zu hlist