EgtCAM5 1.8b2 :

- corretto problema con sottotipo lavorazione in gestione DB lavorazioni.
This commit is contained in:
Dario Sassi
2017-03-07 11:22:32 +00:00
parent b6c96f8c25
commit 8008a9e48e
4 changed files with 50 additions and 64 deletions
+3 -3
View File
@@ -76,15 +76,15 @@ Public Module Utility
Return Name
End Function
Friend Shared Function SearchToId(Id As Integer, List As ObservableCollection(Of IdNameStruct)) As Integer
Friend Shared Function IndFromId(Id As Integer, List As ObservableCollection(Of IdNameStruct)) As Integer
For i = 0 To List.Count - 1
If List(i).Id = Id Then Return i
Next
Return 0
End Function
Friend Shared Function SearchFromId(Id As Integer, List As ObservableCollection(Of IdNameStruct)) As Integer
Return List(Id).Id
Friend Shared Function IdFromInd(Ind As Integer, List As ObservableCollection(Of IdNameStruct)) As Integer
Return List(Ind).Id
End Function
End Structure