Re: Scrolling a window

Hi David,

On 01/03/2010 2:37 PM, Swingle David-QWHM86 wrote:
> Hi, I'd like to scroll a window, but can't seem to get it work.  I've
> seen and tried code that scrolls widgets such as a listbox, but I want
> to scroll the entire window.  What I would prefer is that there be no
> scroll bars unless the user shrinks the window size so that widgets are
> now out of view.  First, I tried to associate the scrollbars with a
> frame, but I would get errors.  So, I tried using a canvas instead.  The
> code I have is below.  It will display scrollbars that do nothing.

In order to scroll a set of widgets (rather than a single widget 
designed for scrolling), you need to use a megawidget that actually 
places the items on a canvas (which has a viewport for handling this). 
Fortunately this case is common enough that there are a couple in the tkkit.

The first is the BWidget ScrolledWindow.  You can find an example of 
that in the tkx-ed code that ships with ActivePerl (look for 
'new_ScrolledWindow').

The second (and my preferred) is package 'widget::scrolledwindow', with 
an example in ActivePerl's lib/ActivePerl/PPM/GUI.pm (look for 
'new_widget__scrolledwindow').

Indeed, the PPM GUI sources are a good source of Tkx code.  We wrote the 
UI entirely in Tkx, just leveraging code in tkkit.  It has examples for 
cross-platform considerations, improved styling with use of native 
themed widgets, and advanced widget use cases.

Regards,

Jeff