Tkx::LabEntry - Labeled entry widget

NAME SYNOPSIS DESCRIPTION LICENSE SEE ALSO

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();

DESCRIPTION

The "Tkx::LabEntry" module implements a trivial megawidget. Its main purpose is to demonstrate how to use the "Tkx::MegaConfig" baseclass.

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.

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.