NAME
Tie::Wx::Widget - get and set the main Value of a Widget with less syntax
SYNOPSIS
use Tie::Wx::Widget;
tie $tiedwidget, Tie::Wx::Widget, $widgetref;
# instead of say $widgetref->GetValue;
say $tiedwidget;
# instead of $widgetref->SetValue('7');
$tiedwidget = 7;
# not required:
untie $tiedwidget;
# now $tiedwidget is just a normal scalar
ATTENTION
Your Program will die, if you don't provide a proper reference to a Wx widget, that has a GetValue and SetValue method.
INTERNALS
# how to get a reference to the Tie::Wx::Widget object?
$tieobjectref = tie $tiedwidget, Tie::Wx::Widget, $widgetref;
$tieobjectref = tied $tiedwidget;
# now you even can:
$tieobjectref->FETCH()
# aka:
$tieobjectref->{'widget'}->GetValue;
# or do any other method on the wx object
$tieobjectref->DESTROY()
AUTHOR
Herbert Breunung, <lichtkind at cpan.org>
BUGS
Please report any bugs or feature requests to bug-tie-wx-widget at rt.cpan.org
, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Tie-Wx-Widget. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Tie::Wx::Widget
You can also look for information at:
RT: CPAN's request tracker (report bugs here)
AnnoCPAN: Annotated CPAN documentation
CPAN Ratings
Search CPAN
Source Repository: (in case you fant to fork :))
ACKNOWLEDGEMENTS
This was solely my idea.
LICENSE AND COPYRIGHT
Copyright 2011 Herbert Breunung.
This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.