2014-09-22 3 views
0

나는 수직 모드에 표시된 페이지와 RadPageView 제어 할 수 있습니다.Telerik, 마우스 휠을 사용하여 RadPageView의 다음 페이지를 선택 하시겠습니까?</p> <p><img src="https://i.stack.imgur.com/yeHYA.jpg" alt="enter image description here"></p> <p>내가보기 자동 마우스를 스크롤 할 때 위의 페이지를 선택하고 싶습니다 아래로 마우스를 스크롤 할 때 아래의 페이지 :

어떻게 할 수 있습니까?

이 VB.Net에서 의사 코드이지만, 나는 C#에서 해결책을 찾을 수 있다면 상관없이이 :

Private Sub RadPageView1_MouseWheel(sender As Object,e As MouseEventArgs) _ 
Handles RadPageView1.MouseWheel 

    Select Case e.Delta 

     Case Is > 0 ' MouseWhell scroll up. 
      If CurrentPageIndex > 0I Then 
       RadPageView1.SelectedPage = ... +1 
      End If 

     Case Else ' MouseWhell scroll down. 
      If CurrentPageIndex < Pages.Count Then 
       RadPageView1.SelectedPage = ... -1 
      End If 

    End Select 

End Sub 

답변

0

을 완료!

''' <summary> 
''' Handles the MouseWheel event of the RadPageView_ActionNames control. 
''' </summary> 
''' <param name="sender">The source of the event.</param> 
''' <param name="e">The <see cref="MouseEventArgs"/> instance containing the event data.</param> 
Private Sub RadPageView_ActionNames_MouseWheel(sender As Object, e As MouseEventArgs) _ 
Handles RadPageView_ActionNames.MouseWheel 

    Dim ctrl As RadPageView = DirectCast(sender, RadPageView) 
    Dim PageIndex As Integer = ctrl.Pages.IndexOf(ctrl.SelectedPage) 

    Select Case e.Delta 

     Case Is > 0 ' MouseWhell scroll up. 
      If PageIndex > 0I Then 
       ctrl.SelectedPage = ctrl.Pages(PageIndex - 1) 
      End If 

     Case Else ' MouseWhell scroll down. 
      If Not PageIndex >= (ctrl.Pages.Count - 1) Then 
       ctrl.SelectedPage = ctrl.Pages(PageIndex + 1) 
      End If 

    End Select 

End Sub