SOLVED!!! Re: How to bind additional data with TextCtrl object?

[Waldemar Biernacki]

Sorry again!

Just after writing the question I'v sold!

It is very, very easy (I'm really unpatient)!


$myCtrlText = Wx::TextCtrl->new( $frame, -1, "some value", [10, 10], [ 100, 20 
], 0 );
$myCtrlText->{DATA} = 'test data';
EVT_CHAR( $myCtrlText, \&Onkeydown );

sub Onkeydown {
        my ( $this, $event ) = @_;
        my $key   = $event->GetKeyCode();

        print $this->{DATA};
}