c973a78476
- migliorie a generazione e simulazione con visualizzazione messaggi di errore - in generazione e simulazione non si ricarica più il progetto ma si ripristina allo stato precedente - migliorata gestione spessore grezzo (ora 0.1 più basso, mentre pezzi in Z esatta) - unificata gestione inserimento e parcheggio pezzi - inizializzate variabili m_bFirst.
42 lines
1.3 KiB
VB.net
42 lines
1.3 KiB
VB.net
Public Class DirectCutPageUC
|
|
|
|
' Dichiarazione delle Page UserControl
|
|
Private m_MainWindow As MainWindow = Application.Current.MainWindow
|
|
Friend m_MachineButtons As MachineButtonsUC
|
|
Friend m_CN As CN_generico
|
|
Private m_bFirst As Boolean = True
|
|
|
|
Private Sub DirectCutPage_Initialized(sender As Object, e As EventArgs)
|
|
|
|
'Creazione delle Page UserControl
|
|
m_MachineButtons = New MachineButtonsUC
|
|
|
|
'Posizionemento nella griglia delle Page UserControl
|
|
m_MachineButtons.SetValue(Grid.RowProperty, 2)
|
|
m_MachineButtons.SetValue(Grid.RowProperty, 2)
|
|
|
|
'Assegno SceneButtons alla pagina
|
|
LowerButtonGrid.Children.Add(m_MachineButtons)
|
|
|
|
End Sub
|
|
|
|
Private Sub DirectCutPage_Loaded(sender As Object, e As RoutedEventArgs)
|
|
If m_bFirst Then
|
|
If m_MainWindow.m_bNCLink Then
|
|
'Rinomino cn per avere nome più corto
|
|
m_CN = m_MainWindow.m_CNCommunication.m_CN
|
|
End If
|
|
m_bFirst = False
|
|
End If
|
|
End Sub
|
|
|
|
|
|
Private Sub FirstAxisBtn_Click(sender As Object, e As RoutedEventArgs) Handles FirstAxisBtn.Click
|
|
m_CN.DGeneralFunctions_WriteCncMode(2)
|
|
m_CN.sz_ManualDataInput = FirstAxisTxBx.Text
|
|
m_CN.MDI_command()
|
|
|
|
End Sub
|
|
|
|
End Class
|