drag a title-less palette stack

[Geoff Canyon]

Here's the relevant code from the titlebar of my Navigator palette.

local sMoving -- boolean that indicates whether we are dragging or not
local sLoc -- the starting loc of the mouse

on mouseDown
   put true into sMoving
   put the mouseLoc into sLoc
end mouseDown

on mouseUp
   put false into sMoving
end mouseUp

on mouseRelease
   put false into sMoving
end mouseRelease

on mouseMove x,y
   if sMoving then
     put the loc of this stack into tLoc
     add x-item 1 of sLoc to item 1 of tLoc
     add y-item 2 of sLoc to item 2 of tLoc
     set the loc of this stack to tLoc
   end if
end mouseMove

On May 7, 2006, at 6:47 AM, betypaul wrote:

> Hi All
>
> I need a script so that a palette stack without a title bar  can be  
> dragged around with a mouseDown within the stack?.
> I have unsuccessfully tried different ways and searched the  
> literature but no luck.
> I feel that somewhere there is an solution, can someone kindly  
> point the way?
>
> many thanks
>
> Paul
>
> _______________________________________________
> use-revolution mailing list
> use-revolution at lists.runrev.com
> Please visit this url to subscribe, unsubscribe and manage your  
> subscription preferences:
> http://lists.runrev.com/mailman/listinfo/use-revolution
>