diff --git a/FlatteningCut.xaml b/FlatteningCut.xaml index b08593a..630ecee 100644 --- a/FlatteningCut.xaml +++ b/FlatteningCut.xaml @@ -9,8 +9,8 @@ - - + + @@ -25,7 +25,8 @@ - + + @@ -75,7 +76,10 @@ - + + @@ -85,6 +89,28 @@ + + + + + + + + + + + + + + + + diff --git a/FlatteningCut.xaml.vb b/FlatteningCut.xaml.vb index 83cbfcd..78e4048 100644 --- a/FlatteningCut.xaml.vb +++ b/FlatteningCut.xaml.vb @@ -84,7 +84,8 @@ Public Class FlatteningCut DirectionTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 15) WidthTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 26) OverlapTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 27) - SideChBx.Content = EgtMsg(MSG_DIRECTCUTPAGEUC + 23) + SideTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 23) + RotLockTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 29) SimulBtn.Content = EgtMsg(MSG_CADCUTPAGEUC + 1) OkBtn.Content = EgtMsg(MSG_DIRECTCUTPAGEUC + 30) End Sub @@ -105,21 +106,6 @@ Public Class FlatteningCut EgtDraw() Return End If - ' Reset punto acquisito - m_bPointP1Ok = False - ' Inizializzo primo punto acquisito dal disegno come centro del grezzo - GetRawCenter(m_ptPrev) - ' Imposto modalità di acquisizione punti - PointModeCmBx.SelectedIndex = PT_MODE.DRAW - ' Imposto tipo di lavorazione della spianatura - TypeCmBx.SelectedIndex = MACH_TYPE.ZIGZAG - ' Assegno parametri di lavorazione già definiti - DepthTxBx.Text = LenToString(m_dDepth, 1) - LenghtTxBx.Text = LenToString(m_dLen, 1) - ' Inizializzo valori non ancora definiti - DirectionTxBx.Text = DoubleToString(m_dAngO - m_MainWindow.m_CurrentMachine.dDeltaC, 2) - WidthTxBx.Text = LenToString(m_dWid, 2) - OverlapTxBx.Text = LenToString(m_dOverlap, 2) ' Origine tavola m_bRawOk = True If Not EgtGetTableRef(1, m_ptTabOri) Then @@ -131,6 +117,24 @@ Public Class FlatteningCut m_bRawOk = False EgtOutLog("Error on RawBox") End If + ' Reset punto acquisito + m_bPointP1Ok = False + m_bPointP2Ok = False + ' Inizializzo primo punto acquisito dal disegno come centro del grezzo + GetRawCenter(m_ptPrev) + ' Imposto modalità di acquisizione punti + PointModeCmBx.SelectedIndex = PT_MODE.DRAW + SetCoordVisibility(True) + ShowCoord() + ' Imposto tipo di lavorazione della spianatura + TypeCmBx.SelectedIndex = MACH_TYPE.ZIGZAG + ' Assegno parametri di lavorazione già definiti + DepthTxBx.Text = LenToString(m_dDepth, 1) + LenghtTxBx.Text = LenToString(m_dLen, 1) + ' Inizializzo valori non ancora definiti + DirectionTxBx.Text = DoubleToString(m_dAngO - m_MainWindow.m_CurrentMachine.dDeltaC, 2) + WidthTxBx.Text = LenToString(m_dWid, 2) + OverlapTxBx.Text = LenToString(m_dOverlap, 2) ' Reset taglio e disabilito bottone esecuzione m_bCutOk = False UpdateSimulOkBtn() @@ -204,11 +208,17 @@ Public Class FlatteningCut m_ptPrev += vtDir * (m_ptRawMax.z - m_ptPrev.z) / vtDir.z End If End If + ' Visualizzo coordinate (rispetto a 0 tavola) + ShowCoord() ' Disegno crocetta che indica il punto acquisito CreateCross(m_nTempLay, m_ptPrev) EgtDraw() End Sub + Private Sub PointModeCmBx_SelectionChanged(sender As Object, e As SelectionChangedEventArgs) Handles PointModeCmBx.SelectionChanged + SetCoordVisibility(PointModeCmBx.SelectedIndex = PT_MODE.DRAW) + End Sub + Private Sub Point1Btn_Click(sender As Object, e As RoutedEventArgs) Handles Point1Btn.Click ' Rimuovo eventuali crocette create acquisendo i punti nel disegno EgtEmptyGroup(m_nTempLay) @@ -282,7 +292,7 @@ Public Class FlatteningCut Private Sub Point2Btn_Click(sender As Object, e As RoutedEventArgs) Handles Point2Btn.Click ' Rimuovo eventuali crocette create acquisendo i punti nel disegno EgtEmptyGroup(m_nTempLay) - ' Deseleziono il bottone (poichè si seleziona automaticamente) cos' nel caso ci sia un errore rimane deselezionato + ' Deseleziono il bottone (poichè si seleziona automaticamente) così nel caso ci sia un errore rimane deselezionato Point2Btn.IsChecked = False ' Reset punto non acquisito m_bPointP2Ok = False @@ -471,6 +481,45 @@ Public Class FlatteningCut EgtDraw() End Sub + Private Sub RotLockChBx_Click(sender As Object, e As EventArgs) Handles RotLockChBx.Click + ' Disegno il taglio + If m_bPointP2Ok Then + Create2PointsFlatteningCut() + Else + CreateFlatteningCut() + End If + SetMachineInCurrPos() + EgtDraw() + End Sub + + Private Sub XcoordTxBx_EgtClosed(sender As Object, e As EventArgs) Handles XcoordTxBx.EgtClosed + ' Recupero il valore della coordinata (in 0 Tab) + Dim dXcoord As Double = 0 + StringToLen(XcoordTxBx.Text, dXcoord) + XcoordTxBx.Text = LenToString(dXcoord, 2) + ' lo assegno al punto corrente (in 0 Macc) + m_ptPrev.x = dXcoord + m_ptTabOri.x + ' Rimuovo eventuali crocette create acquisendo i punti nel disegno + EgtEmptyGroup(m_nTempLay) + ' Disegno crocetta che indica il punto acquisito + CreateCross(m_nTempLay, m_ptPrev) + EgtDraw() + End Sub + + Private Sub YcoordTxBx_EgtClosed(sender As Object, e As EventArgs) Handles YcoordTxBx.EgtClosed + ' Recupero il valore della coordinata (in 0 Tab) + Dim dYcoord As Double = 0 + StringToLen(YcoordTxBx.Text, dYcoord) + YcoordTxBx.Text = LenToString(dYcoord, 2) + ' lo assegno al punto corrente (in 0 Macc) + m_ptPrev.y = dYcoord + m_ptTabOri.y + ' Rimuovo eventuali crocette create acquisendo i punti nel disegno + EgtEmptyGroup(m_nTempLay) + ' Disegno crocetta che indica il punto acquisito + CreateCross(m_nTempLay, m_ptPrev) + EgtDraw() + End Sub + Private Sub SimulBtn_Click(sender As Object, e As RoutedEventArgs) Handles SimulBtn.Click ' Verifico ci sia un taglio valido If Not m_bCutOk Then Return @@ -544,6 +593,10 @@ Public Class FlatteningCut EgtSetInfo(nCutId, INFO_SIDE_ANGLE, m_dAngV) ' Imposto prima direzione EgtSetInfo(nCutId, INFO_DIR, 1) + ' Eventuale bloccaggio rotazione asse C tra le passate + If RotLockChBx.IsChecked Then + EgtSetInfo(nCutId, INFO_ENABLE_INVERT, False) + End If ' Funzione che crea i tagli successivi al primo MultiplyCut(nLayerId, nCutId) ' Creo layer per crocetta di riferimento @@ -597,6 +650,10 @@ Public Class FlatteningCut EgtSetInfo(nCutId, INFO_SIDE_ANGLE, m_dAngV) ' Imposto prima direzione EgtSetInfo(nCutId, INFO_DIR, 1) + ' Eventuale bloccaggio rotazione asse C tra le passate + If RotLockChBx.IsChecked Then + EgtSetInfo(nCutId, INFO_ENABLE_INVERT, False) + End If ' Funzione che crea i tagli successivi al primo MultiplyCut(nLayerId, nCutId) ' Creo layer per crocette di riferimento @@ -678,6 +735,20 @@ Public Class FlatteningCut Return True End Function + Private Sub SetCoordVisibility(bShow As Boolean) + XcoordTxBl.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + XcoordTxBx.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + YcoordTxBl.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + YcoordTxBx.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + End Sub + + Private Sub ShowCoord() + Dim ptText As Point3d = m_ptPrev + ptText.ToLoc(New Frame3d(m_ptTabOri)) + XcoordTxBx.Text = LenToString(ptText.x, 2) + YcoordTxBx.Text = LenToString(ptText.y, 2) + End Sub + Private Function SetMachineInCurrPos() As Boolean ' Recupero la posizione macchina Dim dL1, dL2, dL3, dR1, dR2 As Double diff --git a/GridCut.xaml b/GridCut.xaml index ee3f8cf..aefc5b7 100644 --- a/GridCut.xaml +++ b/GridCut.xaml @@ -101,7 +101,27 @@ - + + + + + + + + + + + + + + + diff --git a/GridCut.xaml.vb b/GridCut.xaml.vb index 807e8f0..6850ffc 100644 --- a/GridCut.xaml.vb +++ b/GridCut.xaml.vb @@ -70,7 +70,7 @@ Public Class GridCut DimPzXTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 20) NumPzYTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 21) DimPzYTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 22) - SideChBx.Content = EgtMsg(MSG_DIRECTCUTPAGEUC + 23) + SideTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 23) SimulBtn.Content = EgtMsg(MSG_CADCUTPAGEUC + 1) OkBtn.Content = EgtMsg(MSG_DIRECTCUTPAGEUC + 30) End Sub @@ -91,17 +91,6 @@ Public Class GridCut EgtDraw() Return End If - ' Reset punto acquisito - m_bPointP1Ok = False - ' Inizializzo primo punto acquisito dal disegno come centro del grezzo - GetRawCenter(m_ptPrev) - ' Imposto modalità di acquisizione punti - PointModeCmBx.SelectedIndex = PT_MODE.DRAW - ' Assegno parametri di lavorazione già definiti - DepthTxBx.Text = LenToString(m_dDepth, 1) - ' Inizializzo valori non ancora definiti - DirectionTxBx.Text = DoubleToString(m_dAngO - m_MainWindow.m_CurrentMachine.dDeltaC, 2) - SideAngleTxBx.Text = DoubleToString(m_dAngV, 2) ' Origine tavola m_bRawOk = True If Not EgtGetTableRef(1, m_ptTabOri) Then @@ -113,6 +102,20 @@ Public Class GridCut m_bRawOk = False EgtOutLog("Error on RawBox") End If + ' Reset punto acquisito + m_bPointP1Ok = False + m_bPointP2Ok = False + ' Inizializzo primo punto acquisito dal disegno come centro del grezzo + GetRawCenter(m_ptPrev) + ' Imposto modalità di acquisizione punti + PointModeCmBx.SelectedIndex = PT_MODE.DRAW + SetCoordVisibility(True) + ShowCoord() + ' Assegno parametri di lavorazione già definiti + DepthTxBx.Text = LenToString(m_dDepth, 1) + ' Inizializzo valori non ancora definiti + DirectionTxBx.Text = DoubleToString(m_dAngO - m_MainWindow.m_CurrentMachine.dDeltaC, 2) + SideAngleTxBx.Text = DoubleToString(m_dAngV, 2) ' Reset taglio e disabilito bottone esecuzione m_bCutOk = False UpdateSimulOkBtn() @@ -186,11 +189,17 @@ Public Class GridCut m_ptPrev += vtDir * (m_ptRawMax.z - m_ptPrev.z) / vtDir.z End If End If + ' Visualizzo coordinate (rispetto a 0 tavola) + ShowCoord() ' Disegno crocetta che indica il punto acquisito CreateCross(m_nTempLay, m_ptPrev) EgtDraw() End Sub + Private Sub PointModeCmBx_SelectionChanged(sender As Object, e As SelectionChangedEventArgs) Handles PointModeCmBx.SelectionChanged + SetCoordVisibility(PointModeCmBx.SelectedIndex = PT_MODE.DRAW) + End Sub + Private Sub Point1Btn_Click(sender As Object, e As RoutedEventArgs) Handles Point1Btn.Click ' Rimuovo eventuali crocette create acquisendo i punti nel disegno EgtEmptyGroup(m_nTempLay) @@ -398,6 +407,34 @@ Public Class GridCut EgtDraw() End Sub + Private Sub XcoordTxBx_EgtClosed(sender As Object, e As EventArgs) Handles XcoordTxBx.EgtClosed + ' Recupero il valore della coordinata (in 0 Tab) + Dim dXcoord As Double = 0 + StringToLen(XcoordTxBx.Text, dXcoord) + XcoordTxBx.Text = LenToString(dXcoord, 2) + ' lo assegno al punto corrente (in 0 Macc) + m_ptPrev.x = dXcoord + m_ptTabOri.x + ' Rimuovo eventuali crocette create acquisendo i punti nel disegno + EgtEmptyGroup(m_nTempLay) + ' Disegno crocetta che indica il punto acquisito + CreateCross(m_nTempLay, m_ptPrev) + EgtDraw() + End Sub + + Private Sub YcoordTxBx_EgtClosed(sender As Object, e As EventArgs) Handles YcoordTxBx.EgtClosed + ' Recupero il valore della coordinata (in 0 Tab) + Dim dYcoord As Double = 0 + StringToLen(YcoordTxBx.Text, dYcoord) + YcoordTxBx.Text = LenToString(dYcoord, 2) + ' lo assegno al punto corrente (in 0 Macc) + m_ptPrev.y = dYcoord + m_ptTabOri.y + ' Rimuovo eventuali crocette create acquisendo i punti nel disegno + EgtEmptyGroup(m_nTempLay) + ' Disegno crocetta che indica il punto acquisito + CreateCross(m_nTempLay, m_ptPrev) + EgtDraw() + End Sub + Private Sub SimulBtn_Click(sender As Object, e As RoutedEventArgs) Handles SimulBtn.Click ' Verifico ci sia un taglio valido If Not m_bCutOk Then Return @@ -623,6 +660,20 @@ Public Class GridCut EgtDraw() End Sub + Private Sub SetCoordVisibility(bShow As Boolean) + XcoordTxBl.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + XcoordTxBx.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + YcoordTxBl.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + YcoordTxBx.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + End Sub + + Private Sub ShowCoord() + Dim ptText As Point3d = m_ptPrev + ptText.ToLoc(New Frame3d(m_ptTabOri)) + XcoordTxBx.Text = LenToString(ptText.x, 2) + YcoordTxBx.Text = LenToString(ptText.y, 2) + End Sub + Private Function SetMachineInCurrPos() As Boolean ' Recupero la posizione macchina Dim dL1, dL2, dL3, dR1, dR2 As Double diff --git a/MultipleCut.xaml b/MultipleCut.xaml index 0feae6e..6c86e9f 100644 --- a/MultipleCut.xaml +++ b/MultipleCut.xaml @@ -24,6 +24,7 @@ + @@ -106,9 +107,29 @@ - + + - + + + + + + + + + + + + + + diff --git a/MultipleCut.xaml.vb b/MultipleCut.xaml.vb index 7df23a7..55665b4 100644 --- a/MultipleCut.xaml.vb +++ b/MultipleCut.xaml.vb @@ -70,7 +70,7 @@ Public Class MultipleCut SideAngleTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 16) NumPzTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 17) DimPzTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 18) - SideChBx.Content = EgtMsg(MSG_DIRECTCUTPAGEUC + 23) + SideTxBl.Text = EgtMsg(MSG_DIRECTCUTPAGEUC + 23) SimulBtn.Content = EgtMsg(MSG_CADCUTPAGEUC + 1) OkBtn.Content = EgtMsg(MSG_DIRECTCUTPAGEUC + 30) End Sub @@ -91,18 +91,6 @@ Public Class MultipleCut EgtDraw() Return End If - ' Reset punto acquisito - m_bPointP1Ok = False - ' Inizializzo primo punto acquisito dal disegno come centro del grezzo - GetRawCenter(m_ptPrev) - ' Imposto modalità di acquisizione punti - PointModeCmBx.SelectedIndex = PT_MODE.DRAW - ' Assegno parametri di lavorazione già definiti - DepthTxBx.Text = LenToString(m_dDepth, 1) - LenghtTxBx.Text = LenToString(m_dLen, 1) - ' Inizializzo valori non ancora definiti - DirectionTxBx.Text = DoubleToString(m_dAngO - m_MainWindow.m_CurrentMachine.dDeltaC, 2) - SideAngleTxBx.Text = DoubleToString(m_dAngV, 2) ' Origine tavola m_bRawOk = True If Not EgtGetTableRef(1, m_ptTabOri) Then @@ -114,6 +102,21 @@ Public Class MultipleCut m_bRawOk = False EgtOutLog("Error on RawBox") End If + ' Reset punto acquisito + m_bPointP1Ok = False + m_bPointP2Ok = False + ' Inizializzo primo punto acquisito dal disegno come centro del grezzo + GetRawCenter(m_ptPrev) + ' Imposto modalità di acquisizione punti + PointModeCmBx.SelectedIndex = PT_MODE.DRAW + SetCoordVisibility(True) + ShowCoord() + ' Assegno parametri di lavorazione già definiti + DepthTxBx.Text = LenToString(m_dDepth, 1) + LenghtTxBx.Text = LenToString(m_dLen, 1) + ' Inizializzo valori non ancora definiti + DirectionTxBx.Text = DoubleToString(m_dAngO - m_MainWindow.m_CurrentMachine.dDeltaC, 2) + SideAngleTxBx.Text = DoubleToString(m_dAngV, 2) ' Reset taglio e disabilito bottone esecuzione m_bCutOk = False UpdateSimulOkBtn() @@ -187,11 +190,17 @@ Public Class MultipleCut m_ptPrev += vtDir * (m_ptRawMax.z - m_ptPrev.z) / vtDir.z End If End If + ' Visualizzo coordinate (rispetto a 0 tavola) + ShowCoord() ' Disegno crocetta che indica il punto acquisito CreateCross(m_nTempLay, m_ptPrev) EgtDraw() End Sub + Private Sub PointModeCmBx_SelectionChanged(sender As Object, e As SelectionChangedEventArgs) Handles PointModeCmBx.SelectionChanged + SetCoordVisibility(PointModeCmBx.SelectedIndex = PT_MODE.DRAW) + End Sub + Private Sub Point1Btn_Click(sender As Object, e As RoutedEventArgs) Handles Point1Btn.Click ' Rimuovo eventuali crocette create acquisendo i punti nel disegno EgtEmptyGroup(m_nTempLay) @@ -415,6 +424,34 @@ Public Class MultipleCut EgtDraw() End Sub + Private Sub XcoordTxBx_EgtClosed(sender As Object, e As EventArgs) Handles XcoordTxBx.EgtClosed + ' Recupero il valore della coordinata (in 0 Tab) + Dim dXcoord As Double = 0 + StringToLen(XcoordTxBx.Text, dXcoord) + XcoordTxBx.Text = LenToString(dXcoord, 2) + ' lo assegno al punto corrente (in 0 Macc) + m_ptPrev.x = dXcoord + m_ptTabOri.x + ' Rimuovo eventuali crocette create acquisendo i punti nel disegno + EgtEmptyGroup(m_nTempLay) + ' Disegno crocetta che indica il punto acquisito + CreateCross(m_nTempLay, m_ptPrev) + EgtDraw() + End Sub + + Private Sub YcoordTxBx_EgtClosed(sender As Object, e As EventArgs) Handles YcoordTxBx.EgtClosed + ' Recupero il valore della coordinata (in 0 Tab) + Dim dYcoord As Double = 0 + StringToLen(YcoordTxBx.Text, dYcoord) + YcoordTxBx.Text = LenToString(dYcoord, 2) + ' lo assegno al punto corrente (in 0 Macc) + m_ptPrev.y = dYcoord + m_ptTabOri.y + ' Rimuovo eventuali crocette create acquisendo i punti nel disegno + EgtEmptyGroup(m_nTempLay) + ' Disegno crocetta che indica il punto acquisito + CreateCross(m_nTempLay, m_ptPrev) + EgtDraw() + End Sub + Private Sub SimulBtn_Click(sender As Object, e As RoutedEventArgs) Handles SimulBtn.Click ' Verifico ci sia un taglio valido If Not m_bCutOk Then Return @@ -647,6 +684,20 @@ Public Class MultipleCut EgtDraw() End Sub + Private Sub SetCoordVisibility(bShow As Boolean) + XcoordTxBl.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + XcoordTxBx.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + YcoordTxBl.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + YcoordTxBx.Visibility = If(bShow, Windows.Visibility.Visible, Windows.Visibility.Hidden) + End Sub + + Private Sub ShowCoord() + Dim ptText As Point3d = m_ptPrev + ptText.ToLoc(New Frame3d(m_ptTabOri)) + XcoordTxBx.Text = LenToString(ptText.x, 2) + YcoordTxBx.Text = LenToString(ptText.y, 2) + End Sub + Private Function SetMachineInCurrPos() As Boolean ' Recupero la posizione macchina Dim dL1, dL2, dL3, dR1, dR2 As Double diff --git a/OmagCUTDictionary.xaml b/OmagCUTDictionary.xaml index 1b50e75..0b3e661 100644 --- a/OmagCUTDictionary.xaml +++ b/OmagCUTDictionary.xaml @@ -314,7 +314,7 @@ diff --git a/SawTestUC.xaml b/SawTestUC.xaml index 8095505..3817a30 100644 --- a/SawTestUC.xaml +++ b/SawTestUC.xaml @@ -66,14 +66,6 @@ Style="{StaticResource OmagCut_CurrProjSummeryTextBlock}"/> - - - - diff --git a/SawTestUC.xaml.vb b/SawTestUC.xaml.vb index 785ccdd..07b584f 100644 --- a/SawTestUC.xaml.vb +++ b/SawTestUC.xaml.vb @@ -85,7 +85,6 @@ Public Class SawTestUC ' Reset punto acquisito m_bPointP1Ok = False m_bPointP2Ok = False - SawTipTxBl.Text = String.Empty ' Imposto modalità di acquisizione punti PointModeCmBx.SelectedIndex = PT_MODE.DRAW ' Assegno parametri di lavorazione già definiti @@ -193,7 +192,6 @@ Public Class SawTestUC EgtEmptyGroup(m_nTempLay) ' Reset punto non acquisito m_bPointP1Ok = False - SawTipTxBl.Text = String.Empty ' Verifico configurazione tavola e grezzo If Not m_bRawOk Then Return @@ -264,7 +262,6 @@ Public Class SawTestUC Point2Btn.IsChecked = False ' Reset punto non acquisito m_bPointP2Ok = False - SawTipTxBl.Text = String.Empty ' Verifico configurazione tavola e grezzo If Not m_bRawOk Then Return diff --git a/SingleCutUC.xaml b/SingleCutUC.xaml index e76a1df..27de85e 100644 --- a/SingleCutUC.xaml +++ b/SingleCutUC.xaml @@ -93,9 +93,6 @@ Style="{StaticResource OmagCut_CalculatorTextBox}"/> - - diff --git a/SingleCutUC.xaml.vb b/SingleCutUC.xaml.vb index 7c52ab5..6da7bd0 100644 --- a/SingleCutUC.xaml.vb +++ b/SingleCutUC.xaml.vb @@ -97,7 +97,6 @@ Public Class SingleCutUC ' Reset punto acquisito m_bPointP1Ok = False m_bPointP2Ok = False - SawTipTxBl.Text = String.Empty ' Inizializzo primo punto acquisito dal disegno come centro del grezzo GetRawCenter(m_ptPrev) ' Imposto modalità di acquisizione punti @@ -200,7 +199,6 @@ Public Class SingleCutUC EgtEmptyGroup(m_nTempLay) ' Reset punto non acquisito m_bPointP1Ok = False - SawTipTxBl.Text = String.Empty ' Verifico configurazione tavola e grezzo If Not m_bRawOk Then Return @@ -275,7 +273,6 @@ Public Class SingleCutUC Point2Btn.IsChecked = False ' Reset punto non acquisito m_bPointP2Ok = False - SawTipTxBl.Text = String.Empty ' Verifico configurazione tavola e grezzo If Not m_bRawOk Then Return