You're right: it works fine. Thanks, Jonathan.
At Thursday 5/18/00 08:27 AM -0400, you wrote:
>Aaron,
>
>Here is how I do it and it works fine:
>
>## This is the window creation
>$adduser = new GUI::DialogBox(
> -title => "Add User Info",
> -left => 387,
> -top => 200,
> -width => 280,
> -height => 195,
> -class => $adduser_class,
> -font => $F,
> -name => "AddUserWindow",
> -style => WS_BORDER | DS_MODALFRAME | WS_CAPTION | WS_POPUP |
> WS_SYSMENU,
> -exstyle => WS_EX_DLGMODALFRAME | WS_EX_WINDOWEDGE |
> WS_EX_CONTROLPARENT,
>);
>
>## I add the text label here
>$adduser->AddLabel(
> -text => "First name: ",
> -left => 10,
> -top => 10,
>);
>
>## I add the textfield here
>$fname_input = $adduser->AddTextfield(
> -left => 120,
> -top => 8,
> -width => 105,
> -height => 22,
> -tabstop => 1,
>);
>
>## I get the value of the textfield in this subroutine
>sub Proceed_Click {
> $fname = $fname_input->Text; ## This is the line to pat
> attention to
> $lname = $lname_input->Text;
> $room = $rm_input->Text;
> $building = $bld_input->Text;
> $adapteraddress = lc($adap_input->Text);
> $validinput = CheckInput();
> $adduser->PostQuitMessage(0);
> return;
>}
>
>
>Jonathan
>--------------------------------------------------------------
>Jonathan Southwick [EMAIL PROTECTED]
>Technical and Network Services
>Allegheny College
>Meadville, PA 16335 814-332-2755
>
>
>----- Original Message -----
>From: "Aaron Smith" <[EMAIL PROTECTED]>
>To: <[EMAIL PROTECTED]>
>Sent: Wednesday, May 17, 2000 4:57 PM
>Subject: Re: [perl-win32-gui] passing user input from a textfield to a scalar
>
>
> > Could someone expand on this, or point me to more information? If I try
> > things this way (my $scalar=Window->text->Text();), I get the following
> error:
> >
> > Can't locate auto/Win32/GUI/Textfield=HASH(0x87651b8).al in @INC (@INC
> > contains:
> > c:/perl/lib/site C:/Perl/lib C:/Perl/site/lib .) at test.pl line 62
> >
> > And my line 62 reads:
> >
> > my $x = $Dialog->$FirstName->Text();
> >
> > Without the above line, the program runs fine.
> >
> > $FirstName is just an AddTextField. I assume my syntax is just wrong.
> But I
> > don't know how. Can anyone shed some light, or point me to some reference
> > that might shed some light? Thanks in advance.
> >
> > Aaron
> >
> >
> > At Sunday 5/7/00 05:35 PM +0700, you wrote:
> > >From: Chris Etzel
> > > >How do I pass the input from the textfield to a scalar
> > > my $scalar=Window->text->Text();
> > >
> > >should do it.
> > >Please post in plain text
> > >
> > >Rob
> > >http://bangkokwizard.com/
> > >Learn what you know. Share what you don't.
> >
> >
> > ----------
> > Aaron Smith - [EMAIL PROTECTED]
> > GW Micro, Inc.
> > Support & Web Development
> > WWW: http://www.gwmicro.com
> > FTP: ftp://ftp.gwmicro.com
> > Voice - 219-489-3671
> > Fax - 219-489-2608
> >
> >
> >
> >
> >
----------
Aaron Smith - [EMAIL PROTECTED]
GW Micro, Inc.
Support & Web Development
WWW: http://www.gwmicro.com
FTP: ftp://ftp.gwmicro.com
Voice - 219-489-3671
Fax - 219-489-2608
