OmagCUT :

- correzione a InsertPart (se pezzo già inserito lo parcheggiava).
This commit is contained in:
Dario Sassi
2019-03-20 07:52:43 +00:00
parent d1554323fa
commit dd787f29de
+5 -3
View File
@@ -758,9 +758,9 @@ Public Class NestPageUC
End If
' Lo metto in tavola, se possibile
If InsertOnePart(nId) Then
' Eventuale notifica al VeinMatching
VeinMatching.OnInsertPartInRaw(nId)
Else
EgtSetStatus(nId, GDB_ST.ON_)
VeinMatching.OnDeselectPart(nId)
End If
' Costringo ad aggiornare UI
@@ -848,8 +848,10 @@ Public Class NestPageUC
End Function
Friend Function InsertOnePart(nId As Integer) As Boolean
Dim bFit As Boolean = False
' Se il pezzo non è in parcheggio, non si può inserire
If Not EgtIsPart(nId) Then Return False
' Metto pezzo in centro grezzo con lavorazioni e sistemazioni varie
Dim bFit As Boolean = False
If PreInsertOnePart( nId) Then
' Eseguo nesting
If UpdateNestRegions() Then
@@ -871,8 +873,8 @@ Public Class NestPageUC
Else
' Ripristino lo stato originale
PreRemoveOnePart( nId)
Return False
End If
Return False
End Function
Private Function AdjustPartSideAngleHeel(nPartId As Integer, dTh As Double) As Boolean