NAME

Tkx::LabEntry - Labeled entry widget

SYNOPSIS

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.

Copyright 2005 ActiveState. All rights reserved.

SEE ALSO

The source code of Tkx::LabEntry.

Tkx::MegaConfig, Tkx