http://gambaswiki.org/bugtracker/edit?object=BUG.1029&from=L21haW4-

Comment #1 by Antonio OREFICE:

Workarounded with the following:

'---------------- HACKY WORKAROUND TO STOP SCROLLVIEWS SCROLLING WHEN OBJECTS 
ARE FOCUSED
    Private Scrollview_is_focused As Boolean = False
    Public Sub ScrollViews_GotFocus()
      Scrollview_is_focused = True
    End
    Public Sub ScrollViews_LostFocus()
      Scrollview_is_focused = False
    End
    
    Public my_observer As Observer
    
    Public Sub dynaobj_gotfocus()
      If (Last Is Spinbox) Or (Last Is Floatspinbox) Then
        If Not Object.IsValid(my_observer) Then
          Debug
          my_observer = New Observer(Last) As "my_observer"
        Endif
      Endif
    End
    
    Public Sub my_observer_MouseWheel()
      If Not Scrollview_is_focused Then
        Stop Event
      Endif
    End
'---------------- HACKY WORKAROUND TO STOP SCROLLVIEWS SCROLLING WHEN OBJECTS 
ARE FOCUSED



------------------------------------------------------------------------------
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to