tyler.durden
/
P3D-Legacy
mirror of https://github.com/P3D-Legacy/P3D-Legacy.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Mouse wheel can reach every item in bag now

This commit is contained in:
JappaWakka 2023-05-29 10:37:32 +02:00
parent ca29595d25
commit ba98f40394
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
P3D/Screens/Inventory/NewInventoryScreen.vb
View File

@ -769,7 +769,7 @@ Public Class NewInventoryScreen
End Sub End Sub
Private Sub UpdateItems() Private Sub UpdateItems()
If Controls.Left(True, True, True, True, True, True) Then If Controls.Left(True, True, False, True, True, True) Then
ItemIndex -= 2 ItemIndex -= 2
If ItemIndex < 0 And PageIndex > 0 Then If ItemIndex < 0 And PageIndex > 0 Then
ItemIndex += 10 ItemIndex += 10
@ -784,7 +784,7 @@ Public Class NewInventoryScreen
End If End If
End If End If
End If End If
If Controls.Right(True, True, True, True, True, True) Then If Controls.Right(True, True, False, True, True, True) Then
If ItemIndex + 2 + (PageIndex * 10) < _items.Length Then If ItemIndex + 2 + (PageIndex * 10) < _items.Length Then
ItemIndex += 2 ItemIndex += 2
If ItemIndex > 9 Then If ItemIndex > 9 Then
@ -795,7 +795,7 @@ Public Class NewInventoryScreen
End If End If
End If End If
End If End If
If Controls.Up(True, True, False, True, True, True) Then If Controls.Up(True, True, True, True, True, True) Then
ItemIndex -= 1 ItemIndex -= 1
If ItemIndex < 0 And PageIndex > 0 Then If ItemIndex < 0 And PageIndex > 0 Then
ItemIndex += 10 ItemIndex += 10
@ -806,7 +806,7 @@ Public Class NewInventoryScreen
ItemIndex = 0 ItemIndex = 0
End If End If
End If End If
If Controls.Down(True, True, False, True, True, True) Then If Controls.Down(True, True, True, True, True, True) Then
If ItemIndex + 1 + (PageIndex * 10) < _items.Length Then If ItemIndex + 1 + (PageIndex * 10) < _items.Length Then
ItemIndex += 1 ItemIndex += 1
If ItemIndex > 9 Then If ItemIndex > 9 Then