Director實例剖析:Director 動態事件傳遞（1）

2024-09-08 19:27:04

字體：大中小

來源：轉載

供稿：網友

director 動態事件傳遞
　　有時在director開發過程中會遇到一些棘手的問題，其中的原因之一是由于行為中包含有某些“陷阱”事件，比如點擊了一個帶有行為的角色，那么此點擊事件將停滯在此角色上，雖然你想讓其下的角色也能夠識別并對事件做出響應。

　　下面的樣本文件演示了這個問題：如果你點擊了上面的角色，則只能獲得從上面角色發送來的消息，即使你的點擊碰巧發生在兩個角色交疊的范圍之內。

播放，以上示例，需下載此插件。點擊下載插件

　　雖然你想讓鼠標事件通過角色層向下傳遞，但由于director在行為中獲得事件的方式，這一點根本無法做到。例如，使用pass命令不會有任何效果。

　　或許你會想到使用sendsprite命令告訴位于當前角色下面的任何角色：一個事件已經發生，需要做出適當的響應。

　　或許你想讓行為做這樣的事情：使用交疊測試來尋找其下的角色，即使被上方的角色遮擋，仍可以將點擊事件傳遞給下方的角色。

property pnintersectsprite

on beginsprite me
me .findlowersprite()
end beginsprite

on mouseup me
me .transmitclick()
end mouseup

on findlowersprite me
　　 nsprite = me . spritenum - 1
　　 rmyrect = sprite ( me . spritenum ). rect
　　 pnintersectsprite = 0
repeat with ntest = nsprite down to 1
　　　　 rtestrect = sprite (ntest). rect
　　　　 rintersect = intersect ( rmyrect, rtestrect )
if rintersect <> rect ( 0 , 0 , 0 , 0 ) then
　　　　　　 pnintersectsprite = ntest
exit repeat
end if
end repeat
end findlowersprite

on transmitclick me
if pnintersectsprite <> 0 then
sendsprite ( pnintersectsprite, #mouseup )
end if
end transmitclick

　　初看起來這可能是一個具有可行性的解決方案，但如果你點擊下面樣本文件中的紅色矩形，將會看到仍然存在的一些問題。

播放，以上示例，需下載此插件。點擊下載插件

　　看到了嗎？不管你在角色2中的何處點擊，角色1都非?！熬琛薄Ｒ簿褪钦f，雖然沒有直接點擊兩角色交疊的地方，但程序認為你這樣做了。

　　這便是問題所在，而要想解決此問題，首先需要查明給出角色是否真的和一個附帶此行為的角色相交疊，其次必須確定當事件被傳遞時下面的角色是否碰巧位于鼠標下方，如果不是的話就不將此事件發送給下面的角色層。

property pnintersectsprite

on beginsprite me
me .findlowersprite()
end beginsprite

on mouseup me
me .transmitevent( #mouseup )
end mouseup

on findlowersprite me
　　 nsprite = me . spritenum - 1
　　 rmyrect = sprite ( me . spritenum ). rect
　　 pnintersectsprite = 0
repeat with ntest = nsprite down to 1
　　　　 rtestrect = sprite (ntest). rect
　　　　 rintersect = intersect ( rmyrect, rtestrect )
if rintersect <> rect ( 0 , 0 , 0 , 0 ) then
　　　　　　 pnintersectsprite = ntest
exit repeat
end if
end repeat
end findlowersprite

on transmitevent me , yevent
if pnintersectsprite <> 0 then
　　　　 pmousepoint = the mouseloc
　　　　 rtestrect = sprite (pnintersectsprite). rect
if pmousepoint. inside ( rtestrect ) then
sendsprite ( pnintersectsprite, yevent )
end if
end if
end transmitevent

　　由于確定了單擊發生時鼠標是否位于下層角色之上，上面的行為將給出更可靠的結果，下面的樣本文件動態演示了這一點。

播放，以上示例，需下載此插件。點擊下載插件

上一篇：Director實例剖析:Director 繪制可交互電影《生存空間》（2）

下一篇：Director實例剖析:五子棋游戲地繪制（1）