-- Gambas.JochenGeorges - 24 Dec 2004

## How to use MouseDown, MouseMove and MouseUp

    ' 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