Tkx::LabEntry - Labeled entry widget
use Tkx; use Tkx::LabEntry; my $mw = Tkx::widget->new("."); my $e = $mw->new_tkx_LabEntry(-label => "Name"); $e->g_pack; my $b = $mw->new_button( -text => "Done", -command => sub { print $e->get, "\n"; $mw->g_destroy; }, ); $b->g_pack; Tkx::MainLoop();
The Tkx::LabEntry module implements a trivial megawidget. Its main purpose is to demonstrate how to use the Tkx::MegaConfig baseclass.
Tkx::LabEntry
Tkx::MegaConfig
Once the Tkx::LabEntry module has been loaded, then its widgets can be constructed in the normal way using the tkx_LabEntry name. Besides having a label (whose text can be accessed with the -label configuration option), these widgets behave exactly like an entry would.
tkx_LabEntry
-label
entry
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Copyright 2005 ActiveState. All rights reserved.
The source code of Tkx::LabEntry.
Tkx::MegaConfig, Tkx
To install Tkx, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Tkx
CPAN shell
perl -MCPAN -e shell install Tkx
For more information on module installation, please visit the detailed CPAN module installation guide.