1 2 3 4 5 6 7 8 9 10 11
use Tk::Pane; $pane = $mw->Scrolled(Pane, Name => 'fred', -scrollbars => 'soe', -sticky => 'we', -gridded => 'y' ); $pane->Frame; $pane->pack;
Guest ZMHat sich erledigt. Habe alle mit pack erzeugten Gui-Elemente in meine $framelist über ->pack(-in=>$framelist, ...) geschoben. Jetzt scrollts!