EgtCAM5 1.8b3 :
- correzione per modifica lavorazione dopo aggiornamento generale lavorazioni - correzione per salvataggio disegno automatico scalpello
This commit is contained in:
+9
-2
@@ -128,6 +128,7 @@ Namespace EgtCAM5
|
||||
EgtDraw()
|
||||
ElseIf IsValidMachiningType(SelectedOperation.m_Type) Then
|
||||
' Leggo il tipo di operazione per impostare il tipo di selezione
|
||||
EgtSetCurrMachining(SelectedOperation.m_Id)
|
||||
Dim OperationType As Integer = -1
|
||||
EgtGetMachiningParam(MCH_MP.TYPE, OperationType)
|
||||
' Abilito la selezione delle lavorazioni
|
||||
@@ -680,8 +681,9 @@ Namespace EgtCAM5
|
||||
''' Execute the Point. This method is invoked by the PointCommand.
|
||||
''' </summary>
|
||||
Public Sub Update()
|
||||
' Recupero fase corrente
|
||||
' Recupero fase corrente e lavorazione corrente
|
||||
Dim nCurrPhase As Integer = EgtGetCurrPhase()
|
||||
Dim nCurrMach As Integer = EgtGetCurrMachining()
|
||||
' Ricalcolo la lavorazione per tutte le operazioni della lista
|
||||
For Each Operation In OperationList
|
||||
If Operation.Type = MCH_OY.DISP Then
|
||||
@@ -694,8 +696,13 @@ Namespace EgtCAM5
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
' Ripristino la fase inizialmente corrente
|
||||
' Ripristino la fase inizialmente corrente e pure la lavorazione
|
||||
EgtSetCurrPhase(nCurrPhase)
|
||||
If nCurrMach <> GDB_ID.NULL Then
|
||||
EgtSetCurrMachining(nCurrMach)
|
||||
Else
|
||||
EgtResetCurrMachining()
|
||||
End If
|
||||
EgtDraw()
|
||||
End Sub
|
||||
|
||||
|
||||
Reference in New Issue
Block a user