The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

NAME

Tk::TabFrame - An alternative to the NoteBook widget : a tabbed geometry manager

SYNOPSIS

$TabbedFrame = $widget->TabFrame
(
-font => '-adobe-times-medium-r-normal--20-*-*-*-*-*-*-*',
-tabcurve => 2,
-padx => 5,
-pady => 5,
[normal frame options...],
);
font - font for tabs
tabcurve - curve to use for top corners of tabs
padx - padding on either side of children
pady - padding above and below children
$CurrentSelection = $l_Window->cget ('-current');
$CurrentSelection = $l_Window->cget ('-raised');
current - (Readonly) currently selected widget
raised - (Readonly) currently selected widget
$child = $TabbedFrame->Frame # can also be Button, Label, etc
(
-caption => 'Tab label',
-tabcolor => 'yellow',
[widget options...],
);
caption - label text for the widget's tab
tabcolor - background for the tab button

Values shown above are defaults.

DESCRIPTION

A tabbed frame geometry manager (like NoteBook). I haven't used NoteBook so I can't really say what behaviour differences or similarities there are. This widget uses direct subwidget creation (no Add methods) and has colors for the tabs.

AUTHORS

Damion K. Wilson, dkw@rcm.bm

HISTORY

January 28, 1998 : Created

February 2, 1999 : raise/lower semantics changed somehow in Tk800.012. Added explicit lower calls for frame and button reordering.

1 POD Error

The following errors were encountered while parsing the POD:

Around line 489:

=cut found outside a pod block. Skipping to next block.