' Gambas class file PUBLIC SUB da1_MouseDown() Draw.Begin(da1) Draw.Ellipse(Mouse.X, Mouse.Y, 9, 9) Draw.End END PUBLIC SUB da2_MouseMove() Draw.Begin(da2) Draw.Ellipse(mouse.X, mouse.Y, 9, 9) Draw.End END PUBLIC SUB da3_MouseUp() Draw.Begin(da3) Draw.Ellipse(Mouse.X, Mouse.Y, 9, 9) Draw.End END