在Dir中，若有text让人输入姓名登录，不能自动捕捉到回车，必须让用户按下规定的“确定”按钮，很不方便，昨天想写一个，基本完成，但是存在问题：不能退格和删除，将BackSpace & Delete键认为是空格了，请高手解决。
stage上有2个text，一个让用户输入，另外一个是测试是否捕捉到回车。
代码：

property pMysprite
property pDisMember
property pTempStr


on beginsprite me
pMysprite=me.spriteNum
member(pMysprite).editable=TRUE
pTempStr=""
end

on getPropertyDescriptionList me
mylist=[:]
addProp mylist, #pDisMember,[#comment:"请选择显示文本的成员：",#default:"",#format:#member]
return mylist

end getPropertyDescriptionList

on keyDown me
if the key <> RETURN then
pTempStr=member(pMysprite).text
member(pMysprite).text=pTempStr & the key
return
else
member(pDisMember).text=member(pMySprite).text
member(pmysprite).text=""
end if
end