I'm trying to move an object within a form.
The following code allows me to move the form, but not the object within the
form, ie when I click on the mouse I can move the form around on the screen,
but no the object within the form.

Any suggestions ?

PRIVATE $MX AS Integer
PRIVATE $MY AS Integer

PUBLIC SUB DrawingArea1_MouseDown()
 $MX = Mouse.ScreenX - ME.X
 $MY = Mouse.ScreenY - ME.Y
END

PUBLIC SUB DrawingArea1_MouseMove()
  ME.Move(Mouse.ScreenX - $MX, Mouse.ScreenY - $MY) 
END
-- 
View this message in context: 
http://old.nabble.com/How-to-move-an-object-within-a-form-tp27209201p27209201.html
Sent from the gambas-user mailing list archive at Nabble.com.


------------------------------------------------------------------------------
Throughout its 18-year history, RSA Conference consistently attracts the
world's best and brightest in the field, creating opportunities for Conference
attendees to learn about information security's most important issues through
interactions with peers, luminaries and emerging and established companies.
http://p.sf.net/sfu/rsaconf-dev2dev
_______________________________________________
Gambas-user mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to