Dario Sassi
15 lines
495 B
VB.net
15 lines
495 B
VB.net
Public Class AssemblyManagerV
|
|
|
|
Private Sub Door_MouseLeftButtonDown(sender As Object, e As MouseButtonEventArgs)
|
|
Dim Item As ListBoxItem = DirectCast(sender, ListBoxItem)
|
|
' Gestisco porta corrente modificata
|
|
If Not Map.refAssemblyManagerVM.ManageModified() Then
|
|
e.Handled = False
|
|
Return
|
|
End If
|
|
' Apro altra porta
|
|
e.Handled = Map.refAssemblyManagerVM.Open(DirectCast(Item.DataContext, AssemblyName))
|
|
End Sub
|
|
|
|
End Class
|