How detect Mouse wheel direction?

iiiypuk.me · Post by **iiiypuk.me** » Thursday 6th April 2023 9:59am

How detect Mouse wheel direction in this event?

Public Sub *_MouseWheel()
  ' ...
End

vuott · Post by **vuott** » Thursday 6th April 2023 1:23pm

I point out this page of the wiki of Gambas Italian programmers forum:

https://www.gambas-it.org/wiki/index.ph ... _rotellina

cogier · Post by **cogier** » Thursday 6th April 2023 2:32pm

Hi iiiypuk.me and welcome to the forum. Try the following code: -

Public Sub Form_MouseWheel()

  If Mouse.Delta = 1 Then Print "Rolling forward"
  If Mouse.Delta = -1 Then Print "Rolling backwards"

End

Gambas ONE