1. help please whit concatenation
- Posted by hebert rangel <hr_2000 at hotmail.com> Feb 23, 2005
- 476 views
how do i take a variable from a text box if my tex box is like this
constant EDIT = create(MultiEditText, "", 0, POPUP,4,38,180, 19,{0,WS_EX_CLIENTEDGE}) </eucode and i want to use what i enter in this text box to concatenate with what is typed in this other text box }}} <eucode> constant EDIT1 = create(MultiEditText, "", 0, POPUP,4,38,180, 19,{0,WS_EX_CLIENTEDGE})
can i concatenate them like this edit + edit1 = edited thanks
2. Re: help please whit concatenation
- Posted by Matt Lewis <matthewwalkerlewis at gmail.com> Feb 23, 2005
- 477 views
hebert rangel wrote: > > > how do i take a variable from a text box if my tex box is like this > }}} <eucode> > constant EDIT = create(MultiEditText, "", 0, POPUP,4,38,180, > 19,{0,WS_EX_CLIENTEDGE}) > </eucode > and i want to use what i enter in this text box to concatenate with what is > typed in this other text box > }}} <eucode> > constant EDIT1 = create(MultiEditText, "", 0, POPUP,4,38,180, > 19,{0,WS_EX_CLIENTEDGE}) > </eucode> {{{ > can i concatenate them like this edit + edit1 = edited Yes:
sequence edit, edit1, edited edit = getText( EDIT ) edit1 = getText( EDIT1 ) edited = edit & edited
Matt Lewis
3. Re: help please whit concatenation
- Posted by Greg Haberek <ghaberek at gmail.com> Feb 23, 2005
- 495 views
> how do i take a variable from a text box if my tex box is like this > }}} <eucode> > constant EDIT = create(MultiEditText, "", 0, POPUP,4,38,180, > 19,{0,WS_EX_CLIENTEDGE}) > </eucode > and i want to use what i enter in this text box to concatenate with what is > typed in this other text box > }}} <eucode> > constant EDIT1 = create(MultiEditText, "", 0, POPUP,4,38,180, > 19,{0,WS_EX_CLIENTEDGE}) > </eucode> {{{ > can i concatenate them like this edit + edit1 = edited > thanks Here's an interactive version that does it on the fly:
include Win32Lib.ew constant Main = create( Window, "Concatenation Demo", 0, Center, Center, 320, 72, 0 ) constant Text1 = create( EditText, "", Main, 2, 2, 308, 20, 0 ) constant Text2 = create( EditText, "", Main, 2, 24, 308, 20, 0 ) sequence vLockedText vLockedText = "" procedure Text1_KeyPress( integer pSelf, integer pEvent, sequence pParams ) -- a key was pressed in Text1, append -- any entered text into Text2 integer keyCode, shift sequence lTempText, lSelection keyCode = pParams[1] shift = pParams[2] lTempText = getText( Text1 ) -- adjust for backspace if keyCode = VK_BACKSPACE then -- ignore return elsif keyCode = VK_RETURN then -- do nothing else lTempText &= keyCode end if setText( Text2, vLockedText & lTempText ) end procedure setHandler( Text1, w32HKeyPress, routine_id("Text1_KeyPress") ) procedure Text2_LostFocus( integer pSelf, integer pEvent, sequence pParams ) -- Text2 lost focus, lock in the -- text that was typed vLockedText = getText( Text2 ) end procedure setHandler( Text2, w32HLostFocus, routine_id("Text2_LostFocus") ) WinMain( Main, Normal )
~Greg
4. Re: help please whit concatenation
- Posted by Ferlin Scarborough <ferlin1 at bellsouth.net> Feb 23, 2005
- 457 views
Matt Lewis wrote: > > hebert rangel wrote: > > > > > > how do i take a variable from a text box if my tex box is like this > > }}} <eucode> > > constant EDIT = create(MultiEditText, "", 0, POPUP,4,38,180, > > 19,{0,WS_EX_CLIENTEDGE}) > > </eucode > > and i want to use what i enter in this text box to concatenate with what is > > typed in this other text box > > }}} <eucode> > > constant EDIT1 = create(MultiEditText, "", 0, POPUP,4,38,180, > > 19,{0,WS_EX_CLIENTEDGE}) > > </eucode> {{{ > > can i concatenate them like this edit + edit1 = edited > > Yes: > }}} <eucode> > sequence edit, edit1, edited > edit = getText( EDIT ) > edit1 = getText( EDIT1 ) > edited = edit & edited > </eucode> {{{ > > Matt Lewis > Matt, Shouldn't the code be this instead?
sequence edit, edit1, edited edit = getText( EDIT ) edit1 = getText( EDIT1 ) edited = edit & edit1
Later. Ferlin Scarborough Learn To Program Games in Free Courses At http://www.gameuniv.net My Euphoria Home Page http://mywebpage.netscape.com/shadetreesoft