|
|
|
Move MIAW
Added on 11/29/2000
|
Moves a MIAW with a sprite as a drag bar,
on mouseDown me
vWin = the activeWindow
mPt = the mouseLoc
origRect = vWin.rect
repeat while the mouseDown
newPt = the mouseLoc
if not inside(newPt, rect(getAt(mPt,1)-3, getAt(mPt,2)-3, getAt(mPt,1)+3, getAt(mPt,2)+3)) then
deltaPt = newPt - mPt
newRect = offset(origRect,getAt(deltaPt,1), getAt(deltaPt,2))
vWin.rect = newRect
origRect = vWin.rect
updateStage
tell the stage to updateStage
end if
end repeat
end
|
|