#32002/3/19 12:17:56
on mouseup me
mui=new(xtra "mui")
if objectP(mui) then
Del=alert(mui,[#buttons:#OkCancel,#default:2,#title:"lingo-BAR",#message:""&return&"您确定将留颜板中的保存颜色删除?",#icon:#question])
case Del of
1:
put "ok"
2:
put "cancel"
end case
mui=void
else
end if
end
-----try it! 自己再修改一下!
编辑历史:[这消息被threem编辑过(编辑时间2002-03-19 12:22:56)]