Tkx::LabEntry(3p)

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