Changeset 44 for trunk/gui/scripts/scroller.tcl

Timestamp:

Aug 16, 2005 11:26:29 AM (19 years ago)

Author:

mmc

Message:

Fixed the MainWin? to honor "-anchor fill" in "web" mode. This
causes the main window to fill all available screen real estate.
Had to fix the scroller to make this work properly. I think
this also fixes problems with scrolled forms not expanding into
available real estate.

File:

• trunk/gui/scripts/scroller.tcl (modified) (1 diff)

trunk/gui/scripts/scroller.tcl

@@ -229 +229 @@
         outer {
             $_frame itemconfigure frame -width [winfo width $_frame]
+            if {[winfo height $_frame] > [winfo reqheight $_frame.f]} {
+                $_frame itemconfigure frame -height [winfo height $_frame]
+            } else {
+                $_frame itemconfigure frame -height 0
+            }
         }
     }