15 lines
955 B
VB.net
15 lines
955 B
VB.net
Public Class MachiningTreeExpanderV
|
|
|
|
' Evento necessario per impedire che venga creata la lavorazione quando si fa doppio click sulla ScrollBar
|
|
Private Sub MachiningsTreeView_MouseDoubleClick(sender As Object, e As System.Windows.Input.MouseButtonEventArgs)
|
|
' recupero il viewmodel associato a questa view in cui è presente la funzione che l'evento deve lanciare
|
|
Dim MachiningTreeExpanderViewModel As MachiningTreeExpanderVM = DirectCast(Me.DataContext, MachiningTreeExpanderVM)
|
|
' recupero il treeviewitem clickato(sorgente dell'evento)
|
|
Dim ClickedTreeViewItem As TreeViewItem = DirectCast(sender, TreeViewItem)
|
|
' ne recupero il VM da passare alla funzione
|
|
Dim ClickedTreeViewItemVM As MachiningTreeViewExpanderItem = DirectCast(ClickedTreeViewItem.DataContext, MachiningTreeViewExpanderItem)
|
|
MachiningTreeExpanderViewModel.TreeViewDoubleClick(ClickedTreeViewItemVM)
|
|
End Sub
|
|
|
|
End Class
|