Imports EgtBEAMWALL.Core

Public Class PartInRawPartListV

   'Private Sub PartInRawPartList_PreviewMouseDown(sender As Object, e As MouseButtonEventArgs)
   '   If TypeOf sender Is DataGridRow Then
   '      Dim Row As DataGridRow = DirectCast(sender, DataGridRow)
   '      If Not IsNothing(Row) AndAlso Row.IsSelected Then
   '         Dim MyMachGroup As MyMachGroupVM = Map.refMachGroupPanelVM.SelectedMachGroup
   '         MyMachGroup.SelPart = MyMachGroup.SelPart
   '      End If
   '   End If
   'End Sub

End Class
