open System
open System.Windows.Forms

let form = new Form(Text = "Sono una cosa inutile :D!", Width = 800, Height = 600)

form.MouseDown
    |> Event.add (fun _ -> printfn "Ehiehiehi, hai premuto un tasto del mouse!")

form.MouseWheel
    |> Event.add (fun e -> printfn "Ehiehiehi, hai mosso la rotella di %d tacche!" e.Delta)

[<STAThread>]
do Application.Run (form)