Tk::LabFrame - labeled frame.
$f = $parent->LabFrame(?-label=>text, -labelside=>where, ...?);
LabFrame is exactly like Frame and additionaly allows to add a label to the frame.
LabFrame supports the same options as the Frame widget.
Additional options of LabFrame are:
Run the following test program to see this in action:
use strict; use Tk; require Tk::LabFrame; require Tk::LabEntry;
my $test = 'Test this'; my $mw = Tk::MainWindow->new; my $f = $mw->LabFrame(-label => "This is a label", -labelside => "acrosstop"); $f->LabEntry(-label => "Testing", -textvariable => \$test)->pack; $f->pack; Tk::MainLoop;
Perhaps LabFrame should be subsumed within the generic pTk labeled widget mechanism.
Rajappa Iyer firstname.lastname@example.org
This code is derived from LabFrame.tcl and LabWidg.tcl in the Tix4.0 distribution by Ioi Lam. The code may be redistributed under the same terms as Perl.