Tk::Derived - Base class for widgets derived from others |
Tk::Derived - Base class for widgets derived from others
package Tk::Whatever; require Tk::Something; require Tk::Derived;
@ISA = qw(Tk::Derived Tk::Something);
sub Populate { my ($cw,$args) = @_; ... $cw->SUPER::Populate($args); $cw->ConfigSpecs(...); ... }
Tk::Derived is used with perl5's multiple inheritance to override some methods normally inherited from Tk::Widget.
Tk::Derived should precede any Tk widgets in the class's @ISA.
Tk::Derived's main purpose is to apply wrappers to configure
and cget
methods of widgets to allow the derived widget to add to or modify behaviour
of the configure options supported by the base widget.
The derived class should normally override the Populate
method provided
by Tk::Derived and call ConfigSpecs
to declare configure options.
The public methods provided by Tk::Derived are as follows:
Tk::Derived - Base class for widgets derived from others |