From fa08586baf8bad2fa78e74ed2a1777ff2fa630d0 Mon Sep 17 00:00:00 2001 From: Dario Sassi Date: Mon, 6 Feb 2017 10:59:34 +0000 Subject: [PATCH] EgtCAM5 1.8b2 : - modifiche per disegno automatico dello scalpello (chisel). --- My Project/AssemblyInfo.vb | 4 ++-- ToolsDbWindow/ToolTreeView.vb | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb index cbbc950..923dc33 100644 --- a/My Project/AssemblyInfo.vb +++ b/My Project/AssemblyInfo.vb @@ -70,5 +70,5 @@ Imports System.Windows ' by using the '*' as shown below: ' - - + + diff --git a/ToolsDbWindow/ToolTreeView.vb b/ToolsDbWindow/ToolTreeView.vb index c20c58f..8c4ce48 100644 --- a/ToolsDbWindow/ToolTreeView.vb +++ b/ToolsDbWindow/ToolTreeView.vb @@ -1134,7 +1134,7 @@ Public Class ToolTreeViewItem StringToLen(m_Thick, dThick) StringToLen(m_MaxMat, dMaxMat) Select Case Type - Case MCH_TY.DRILL_STD, MCH_TY.DRILL_LONG + Case MCH_TY.DRILL_STD, MCH_TY.DRILL_LONG, MCH_TY.CHISEL_STD ' imposto dati utensile EgtLuaSetGlobStringVar("TOOL.TOOLHOLDER", ToolHolder) EgtLuaSetGlobNumVar("TOOL.TOTLEN", dTotLen) @@ -1158,7 +1158,7 @@ Public Class ToolTreeViewItem EgtLuaSetGlobNumVar("TOOL.MAXMAT", dMaxMat) Case Else m_nDrawingError = 999 - Draw = String.Empty + m_Draw = String.Empty Return False End Select ' passo all'ambiente di disegno dell'utensile