OK I now have it so it gets the text from the edit field and does  
something with it

dim txt$
txt$ = FN ButtonTextString$(_SpeakTxt)

Now how would I go about adding text to the edit field when a button  
is pressed?

Below is my edit field
text _sysfont,12,0
SetRect( r, 105, 107, 492, 190 )
appearance button _Speaktxt, _activeBtn,,,,, @r, _kControlEditTextProc



Brian