Help for this page

Select Code to Download


  1. or download this
    sub selectProjectDialog_newtest
    {
    ...
        $scrolled1->Subwidget('listbox')->bind('<MouseWheel>',[ \&wheel_br
    +owse, $scrolled1, Tk::Ev('D')]);
    }