[futurebasic] Getting text from a appearance button _kControlEditTextProc edit field

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : December 2006 : Group Archive : Group : All Groups

From: Brian Heibert <heibert@...>
Date: Thu, 28 Dec 2006 11:32:19 -0700
I am using this

text _sysfont,12,0
SetRect( r, 105, 107, 492, 190 )
appearance button _Speaktxt, _activeBtn,,,,, @r, _kControlEditTextProc

to create a edit field and a edit field appears in my window just fine

Now I want to know how to get the text that is in that edit field
and do something with it

_cBtn is my push button that is supposed to do something with the  
text in the edit field
But it is not doing anything

I tried

case _cBtn
beep
dim txt$
txt$ = EDIT$(_SpeakTxt)
long if fn hasSpeechMgr

while fn SpeechBusy
wend
long if txt$ <> " "
FN CallAlert
err = fn SpeakString (txt$)


xelse
FN CallAlert1

-Brian