NAME
Tk::CollapsableFrame - a Frame that opens and closes via a mouse click.
SYNOPSIS
$cf = $parent->CollapsableFrame>(-option => value);
DESCRIPTION
This widget provides a switchable open or closed Frame that provides for the vertical arrangement of widget controls. This is an alternative to Notebook style tabbed widgets.
The following option/value pairs are supported:
- -title
-
Title of the CollapsableFrame widget.
- -height
-
The maximun open height of the CollapsableFrame.
METHODS
- close
-
Closes the CollapsableFrame.
- open
-
Opens the CollapsableFrame.
- state
-
Returns the open/close state of the CollapsableFrame, either "open" or "close".
- toggle
-
Toggles the open/close state of the CollapsableFrame.
ADVERTISED WIDGETS
Component subwidgets can be accessed via the Subwidget method. Valid subwidget names are listed below.
- Name: colf, Class: Frame
-
Widget reference of the internal Frame widget within which user widgets are managed.
EXAMPLE
use Tk::widgets qw/CollapsableFrame Pane/;
my $mw = MainWindow->new;
my $pane = $mw->Scrolled(
qw/Pane -width 250 -height 50 -scrollbars osow -sticky nw/,
)->pack;
my $cf = $pane->CollapsableFrame(-title => 'Frame1 ', -height => 50);
$cf->pack(qw/-fill x -expand 1/);
$cf->toggle;
my $colf = $cf->Subwidget('colf');
my $but = $colf->Button(-text => 'Close Frame 1!');
$but->pack;
$but->bind('<Button-1>' => [sub {$_[1]->close}, $cf]);
AUTHOR and COPYRIGHT
Stephen.O.Lidie@Lehigh.EDU, 2000/11/27.
Copyright (C) 2000 - 2003, Stephen O. Lidie.
This program is free software, you can redistribute it and/or modify it under the same terms as Perl itself.
Based on the Tck/Tk CollapsableFrame widget by William J Giddings.
KEYWORDS
CollapsableFrame, Frame, Pane