From e98e9ed416ea7df3608df731abdea27764331fc0 Mon Sep 17 00:00:00 2001 From: NicolaP Date: Mon, 11 Apr 2022 12:56:58 +0200 Subject: [PATCH 1/2] Correzione spianatura con fresa --- DirectCuts/FlatteningCut.xaml.vb | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/DirectCuts/FlatteningCut.xaml.vb b/DirectCuts/FlatteningCut.xaml.vb index e305a5a..e456b44 100644 --- a/DirectCuts/FlatteningCut.xaml.vb +++ b/DirectCuts/FlatteningCut.xaml.vb @@ -644,7 +644,8 @@ Public Class FlatteningCut Dim nPartId = EgtCreateGroup(GDB_ID.ROOT) EgtSetName(nPartId, NAME_DIRECTCUT) Dim nLayerId = EgtCreateGroup(nPartId) - EgtSetName(nLayerId, NAME_OUTLOOP) + ' EgtSetName(nLayerId, NAME_OUTLOOP) + EgtSetName(nLayerId, NAME_ONPATH) ' Creo il taglio Dim ptStart As Point3d = m_ptTipP1 ptStart.z = 0 From dc316650293da1a4606656aab6e46a18be6d780e Mon Sep 17 00:00:00 2001 From: NicolaP Date: Mon, 11 Apr 2022 13:02:25 +0200 Subject: [PATCH 2/2] Aggiornamento versione --- MainWindow.xaml.vb | 4 ++-- My Project/AssemblyInfo.vb | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/MainWindow.xaml.vb b/MainWindow.xaml.vb index 4c80ce4..70a9d71 100644 --- a/MainWindow.xaml.vb +++ b/MainWindow.xaml.vb @@ -323,8 +323,8 @@ Class MainWindow ' Verifico abilitazione nesting automatico m_bAutoNest = Not String.IsNullOrWhiteSpace(sNestKey) ' Recupero opzioni della chiave - Dim bKey As Boolean = EgtGetKeyLevel(9423, 2402, 1, m_nKeyLevel) And - EgtGetKeyOptions(9423, 2402, 1, m_nKeyOptions) + Dim bKey As Boolean = EgtGetKeyLevel(9423, 2404, 1, m_nKeyLevel) And + EgtGetKeyOptions(9423, 2404, 1, m_nKeyOptions) ' Verifico abilitazione prodotto Dim bProd As Boolean = GetKeyOption(KEY_OPT.CUT_BASE) ' Inizializzazione generale di EgtInterface diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb index 5feb32b..fd8d5e6 100644 --- a/My Project/AssemblyInfo.vb +++ b/My Project/AssemblyInfo.vb @@ -62,5 +62,5 @@ Imports System.Windows ' by using the '*' as shown below: ' - - + +