wxperl-users

Re: [wxperl-users] Dialog return values?

[Mattia B. <mb...@ds...>]

> is there anyway to pass something besides a return code from a dialog?
> looking in the documentation, it seems that GetReturnCode is the only 
> way to communicate.
This is correct; of course, you can store data in instance variables:

my $dlg = MyDialog->new( ... );
my $ret = $dlg->ShowModal;
if( $ret == wxID_OK ) {
  my $data = $dlg->{DATA}; # ->{DATA} has been initialised
                           # by MyDialog::OnOk
}
$dlg->Destroy;

HTH
Mattia

Re: [wxperl-users] Dialog return values?

[boo r. <boo...@at...>]

Mattia Barbon wrote:
>>is there anyway to pass something besides a return code from a dialog?
>>looking in the documentation, it seems that GetReturnCode is the only 
>>way to communicate.
> 
> This is correct; of course, you can store data in instance variables:
> 
> my $dlg = MyDialog->new( ... );
> my $ret = $dlg->ShowModal;
> if( $ret == wxID_OK ) {
>   my $data = $dlg->{DATA}; # ->{DATA} has been initialised
>                            # by MyDialog::OnOk
> }
> $dlg->Destroy;
> 

So it seems I'm responsible for providing a, e.g., GetData method for my 
users. Fair enough.

Thanks, Mattia