in reply to perl Tk::Scrolled : how do I hijack existing subwidget bindings?
Now whenever the y scrollbar is moved, the callback will be executed. Read "perldoc Tk::Scrollbar"my $scrollery = $plist ->Subwidget("yscrollbar"); $scrollery ->configure(-background => "green", -troughcolor => "black", -command => \&somecallback );
|
|---|