EgtCAM5 :

- Migliorie varie.
2016-07-09 19:17:02 +00:00
parent a10b8d2ec6
commit 4db56e7e09
25 changed files with 510 additions and 44 deletions
@@ -378,19 +378,6 @@ Namespace EgtCAM5
         End If
      End Sub

-      'Private Sub ObjTree_AfterSelect(ByVal sender As Object, ByVal e As TreeViewEventArgs) Handles TreeView1.AfterSelect
-      '   ' verifico che il select derivi da azione utente
-      '   If e.Action = TreeViewAction.Unknown Then
-      '      Return
-      '   End If
-      '   ' recupero l'Id del nuovo oggetto selezionato
-      '   Dim nId As Integer
-      '   If Not Int32.TryParse(e.Node.Name, nId) Then
-      '      Return
-      '   End If
-      '   UpdateObjInObjTree(nId)
-      'End Sub
-
      'Private Sub ObjTree_MouseUp(ByVal sender As Object, e As MouseEventArgs) Handles TreeView1.MouseUp
      '   ' determino Id di eventuale item sotto il mouse
      '   Dim nId As Integer = GDB_ID.NULL