Re: [perl-win32-gui-users] ACK!! Sputter Cough... say it isn't so!

[Marcus <li...@wo...>]

On 04.11.01 at 06:28 Mark Wilkinson wrote:
>The real question is this:  how do you get your variables into your
widget
>event
>control subroutines?  e.g. the code below:
>
>use strict;
>my $x = 1;
>
>sub Button_Click {
>    ++$x
>}

Well, I think you need to declare subs as:
sub main::Button_Click {

or at the latest when you have an external widget, your events won't be
processed. I just figured that one out again, or should I say I
remembered what I'd read in the manual :-)

and for your $x, call it $main::x.

I've been wrestling with this stuff too. I just wrote a remote FTP
directory selector which sits in a separate module and in order to set
the Textfield I have to say
$main::win->RemoteDirectoryTextField->Text("...");

You can't use a return value because that gets sent back to
Win32::GUI's main loop and that wants to receive 0,1, or -1 only. I
think that's correct isn't it?

Marcus