NAME

Tie::Wx::Widget - get and set the main Value of a Widget with less syntax

VERSION

Version 0.5

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 reference

$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:

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.