我有以下实现单选按钮效果的代码，（一）是用于DR提供的单选按钮；（二）用于导入的小图片。但我在程序中看不到单选效果，请各位大侠指正。
（一）
property pstate,pgrouplist

on getpropertydescriptionlist me
list=[:]
addprop list,#pstate,[#comment:"initial state",#format:#boolean,#default:false]
addprop list,#pgrouplist,[#comment:"group list",#format:#list,#default:[]]
return list
end

on beginsprite me
if pstate then turnmeon(me)
end

on turnmeon me
pstate=true
sprite(me.spritenum).member.hilite=true
repeat with i in pgrouplist
if i<>me.spritenum then
sendsprite(sprite i,#turnmeoff)
end if
end repeat
end

on turnmeoff me
pstate=false
sprite(me.spritenum).member.hilite=false
end

on mouseup me
turnmeon(me)
end

on selected me
repeat with i in pgrouplist
if sprite(i).pstate=true then return i
end repeat
end

（二）
property ponmember,poffmember,pstate,pgrouplist

on getpropertydescriptionlist me
list=[:]
addprop list,#ponmember,[#comment:"on member",#format:#member,#default:""]
addprop list,#poffmember,[#comment:"off member",#format:#member,#default:""]
addprop list,#pstate,[#comment:"initial state",#format:#boolean,#default:false]
addprop list,#pgrouplist,[#comment:"group list",#format:#list,#default:[]]
return list
end

on turnmeon me
pstate=true
sprite(me.spritenum).member=ponmember
repeat with i in pgrouplist
if i<>me.spritenum then
sendsprite(sprite i,#turnmeoff)
end if
end repeat
end

on turnmeoff me
pstate=false
sprite(me.spritenum).member=poffmember
end

on mouseup me
turnmeon(me)
end

on selected me
repeat with i in pgrouplist
if sprite(i).pstate=true then return i
end repeat
end

这样来实现单选，太累了吧，！

mzgjingsi在上个帖子中说

引用:

---

将
addprop list,#pgrouplist,[#comment:"group list",#format:#list,#default:&#;]

修改为
addprop list,#pgrouplist,[#comment:"group list",#format:#list,#default:[4,5,6]]

我试过，没有问题

---

对不起，贴的时候可能复制有问题，原来的是：
addprop list,#pgrouplist,[#comment:"group list",#format:#list,#default:[ ]]
这样不行么？
[4,5,6]表示什么？