![]() |
![]()
| ![]() |
![]()
NAMETk::CornerBox - a geometry manager for scaling two subwidgets SYNOPSISuse Tk; use Tk::CornerBox; my $l_MainWindow = MainWindow->new(); my $l_Corner = $l_MainWindow->CornerBox(); $l_Corner->place ( '-width' => 20, '-height' => 20, '-relx' => 1, '-rely' => 1, '-anchor' => 'se', '-x' => -3, '-y' => -3, ); Tk::MainLoop(); DESCRIPTIONThe CornerBox is a simple textured widget that allows you to resize the window its in by dragging it. You use it by creating one in the regular Tk manner and (preferably) packing or placing it in the lower right corner of your window. It is frame derived and should act accordingly. AUTHORSDamion K. Wilson, dkw@rcm.bm Based on the little corner drag widget that you see all over the place. Hey, I know it's a M$oft thingy but I've got to integrate my Perl/Tk apps into that environment. HISTORYFebruary 1999: Actually started using it POD ERRORSHey! The above document had some coding errors, which are explained below:
|