我在编一个登录界面~设置屏蔽一些功能健,判断输入字符什么的~但是写完后发现出错了~自己找了半天没找出~
错误是这句话the keyboardFocusSprite=FocusSpritePer
我不知道错在哪里~ 请指教~

property MyTxt
property FocusSpriteText,FocusSpritePer
property EnterLingo

on beginsprite me
sprite(me.spritenum).ink=36
sprite(me.spritenum).cursor=1
MyTxt=sprite(me.spritenum).member
end

on mouseup me
the keyboardFocusSprite=me.spritenum
end

on exitframe me
if the keyboardFocusSprite<>me.spritenum then
sprite(me.spritenum).ink=1
else
sprite(me.spritenum).ink=0
end if
end

on keydown me
case the keycode of
117:
pass
51:
pass
76:
the keyboardFocusSprite=FocusSpriteNext

do EnterLingo
48:
if the shiftDown then
the keyboardFocusSprite=FocusSpritePer
else
pass
end if
otherwise
if MyTxt.char.count=10 then
beep
else
pass
end if
end case
end

on isOKTOAttach (me, aSpriteType, aSpriteNum)
case sprite(aSpriteNum).member.type of
#field:
return 1
#text:
return 1
otherwise:
return 0
end case
end isOKToAttach

on getPropertyDescriptionList
Prolist=[:]
setaprop Prolist,#FocusSpriteNext,[#comment:"-Enter-：",#format:#integer,#defaultthe currentspritenum+1)]
setaprop Prolist,#FocusSpriteNext,[#comment:"-Shift+Tab-：",#format:#integer,#defaultthe currentspritenum-1)]
setaprop Prolist,#EnterLingo,[#comment:"-Enter-:",#format:#string,#default:"--noting--"]
return Prolist
end getPropertyDescriptionList

你的 FocusSpritePer 没有初始化，而前面的声明中 FocusSpriteText 会不会是 FocusSpriteNext？

最后，在 on getPropertyDescriptionList 当中，初始化了两次 FocusSpriteNext，是否其中一个应该改为 FocusSpritePer ？