# Add a scrollable frame, so that we do not have to worry about the size
#
set sw [ScrolledWindow .sw -relief sunken -borderwidth 2]
set sff [ScrollableFrame .sw.f]
$sw setwidget $sff
set sf [$sff getframe]
#
# Add the various elements
#
set lid [label $sf.name -text "Name"]
set eid [entry $sf.editname -textvariable name]
pack $sw -fill both -expand yes
# do not pack $sff
pack $lid $eid
#(So the trick is: first create a scrolled
If you would like to refer to this comment somewhere else in this project, copy and paste the following link:
Logged In: YES
user_id=933468
Originator: YES
Example of a scrollable window using bwidgets.
# Add a scrollable frame, so that we do not have to worry about the size
#
set sw [ScrolledWindow .sw -relief sunken -borderwidth 2]
set sff [ScrollableFrame .sw.f]
$sw setwidget $sff
set sf [$sff getframe]
#
# Add the various elements
#
set lid [label $sf.name -text "Name"]
set eid [entry $sf.editname -textvariable name]
pack $sw -fill both -expand yes
# do not pack $sff
pack $lid $eid
#(So the trick is: first create a scrolled