property myDown
on beginsprite me
myDown=false
end
on mouseDown me
myDown=true
end
on mouseUp me
myDown=false
end
on exitframe me
if myDown then
moveH=the mouseh-sprite(me.spritenum).loch
moveV=the mousev-sprite(me.spritenum).locv
(the stage).rect=(the stage).rect+rect(moveH,moveV,moveH,moveV)
end if
end

将上面的行为付给你窗口中的一个组件。应该没问题的