For single line input action, on a multiline textfield:
sub Input_Change {
$_=$Window->Input->GetLineCount();
if ($_>1) {
$_=$Window->Input->GetLine($_-2);
##Do on enter
}
}
Jerome McKean
Dream frequency; Imagination Realised
http://dreamfrequency.com
> From: larry moore <lgmj@ea...>
> RE: Textfield
> 2002-05-14 06:52
>
> Upon a little closer look at the documentation for -multiline, it says the
> the return is \r\n, will this make a difference to my chomp? Should I be
> removing \r\n and searching for both chars?
>
> Thanks,
>
> Larry
>
> -----Original Message-----
> From: Sean Healy [mailto:jalopeura@ho...]
> Sent: Tuesday, May 14, 2002 9:44 AM
> To: lgmj@ea...; perl-win32-gui-users@li...
> Subject: Re: [perl-win32-gui-users] Textfield
>
>
> >Is there a way to make the return key register for a Textfield. I am using
> >a sub Textfield_1_Change and would like to use the -text for this object to
> >be used in a search string when the user has hit the return key. As a
> >first
> >step, I have been echoing each key press to the dos window, but the return
> >key seems to have no effect.
>
> Here"s a workaround:
> Make the Textfield -multiline => 1.
> Use the _Change event:
> Grab the text whenever the user changes it
> Test the text against =~s/\n//g;
> Return if this test fails
> Restore the text
> Do your search
>
> I used to simply check that the text string ended with a \n and then chomp
> it and restore the text. But if a user wants to redo the same search, he
> might just click anywhere in the textfield and hit enter, so your \n could
> be anywhere in the text string.
>
> _________________________________________________________________
> MSN Photos is the easiest way to share and print your photos:
> http://photos.msn.com/support/worldwide.aspx
>
>
|