Wie funktioniert bind <MouseWheel> ???? - #44744 (Graphische Oberflächen) - Perl-Community.de

Thread Wie funktioniert bind <MouseWheel> ???? (3 answers)
Opened by DocJunioR at 2005-10-06 14:11

renee

2005-10-06 14:27

#44744

#44744

User since
2003-08-04
14371 Artikel
ModeratorIn

[Homepage]

[default_avatar]

Das müsste man über den Wert von Ev('D') herausfinden können...

probier mal:

Code: (dl )

$widget->bind('<MouseWheel>',[sub{print $_[1] < 0 ? "nach oben" : "nach unten"},Ev('D')]);

\n\n

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/

View full thread Wie funktioniert bind <MouseWheel> ????