| on exitFrame me
check --检测鼠标事件并在当前帧循环
go the frame
end
on check
global _color, _text
repeat while the mouseDown --检测鼠标按键
if the mousemember <> member("circle") then --如果鼠标没有
--选中调色饼
exit --则退出
end if
--得到相对于调色饼的鼠标点的位置，并取该点颜色值
--注意计算该点时,是用鼠标位置减去调色饼的左上角坐标，
--而不是调色饼的位置Loc
_loc = the mouseloc - point(sprite(1).rect[1],sprite(1).rect[2])
_color = member("circle").image.getpixel(_loc)
--如果取色为黑色或白色，则退出，这样可以保证只有鼠标点中饼图时才
--检测到颜色
if (_color = rgb(0,0,0)) or (_color = rgb(255,255,255)) then
exit
end if
--在文本框中显示颜色值，并改变文本框背景色为选取色
member("textbar").text = _text &Return& _color
sprite(2).bgcolor = _color
updatestage
end repeat
end
|
