Public Class AssemblyManagerV

   Private Sub Door_MouseLeftButtonUp(sender As Object, e As MouseButtonEventArgs)
      Dim Item As ListBoxItem = DirectCast(sender, ListBoxItem)
      If IsNothing(Map.refAssemblyManagerVM.CurrProject.SelAssemblyName) then 
         e.Handled=True
         Return
      End If
      ' Gestisco porta corrente modificata
      If Map.refAssemblyManagerVM.CurrProject.SelAssemblyName.IsModified then
         If Not Map.refAssemblyManagerVM.ManageModified() Then
            Return
         End If
         Item.IsSelected=Not Map.refAssemblyManagerVM.CurrProject.IsBlockedSelAssemblyName(DirectCast(Item.DataContext, AssemblyName))
         Return
      End If
      ' verifico se il progetto cliccato è quello già selezionato
      'If Map.refAssemblyManagerVM.CurrProject.SelAssemblyName Is DirectCast(Item.DataContext, AssemblyName) Then
      ' ricarico la porta
      e.Handled= Map.refAssemblyManagerVM.CurrProject.IsBlockedSelAssemblyName(DirectCast(Item.DataContext, AssemblyName))
      'End If
      'If IsModified Then
      '   Map.refAssemblyManagerVM.CurrProject.SelAssemblyName = DirectCast(Item.DataContext, AssemblyName)
      'End If
   End Sub

End Class