Hi Viktoras,

Dear all,

If window shape is set to graphics (with no title bar and controls shown) how do we make the window dragable, so it can be dragged around the desktop?

I ususally create a simple button with the size of the card/stack with the following script
and set its INK to "noop" :-)

###################
local maydrag

on mouseDown
  put mouseH() & "," & mouseV() into maydrag
end mouseDown

on mouseMove
  if maydrag is not empty then
set the topLeft of this stack to item 1 of the screenMouseLoc - item 1 of maydrag,item 2 of the screenMouseLoc - item 2 of maydrag
  end if
end mouseMove

on mouseUp
  put empty into maydrag
end mouseUp

on mouserelease
  mouseup
end mouserelease
##################

Viktoras

Regards

Klaus Major
[EMAIL PROTECTED]
http://www.major-k.de

_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription 
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to