diff --git a/NestPageUC.xaml.vb b/NestPageUC.xaml.vb index d5d686f..a76dbd7 100644 --- a/NestPageUC.xaml.vb +++ b/NestPageUC.xaml.vb @@ -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