Files
icarus/Icarus/TopPanel/TopPanelV.xaml.vb
2022-09-21 09:21:41 +02:00

13 lines
397 B
VB.net

Public Class TopPanelV
Private Sub ModifyModeList_PreviewMouseDown(sender As Object, e As MouseButtonEventArgs)
If TypeOf sender Is ListBoxItem Then
Dim Item As ListBoxItem = DirectCast(sender, ListBoxItem)
If Not IsNothing(Item) AndAlso Item.IsSelected Then
Map.refTopPanelVM.SetModifyIsChecked(False)
End If
End If
End Sub
End Class