' Gambas class file PUBLIC SUB DrawingArea1_MouseMove() TextBox1.text = Mouse.X TextBox2.text = Mouse.Y END