From 45a8408ab4688d00bd8656c2763be858acfcb5b3 Mon Sep 17 00:00:00 2001 From: Dario Sassi Date: Thu, 2 Jun 2016 07:05:42 +0000 Subject: [PATCH] TestEIn 1.6r8 : - aggiornamento interfaccia. --- EgtInterface.vb | 10 +++++----- My Project/AssemblyInfo.vb | 4 ++-- 2 files changed, 7 insertions(+), 7 deletions(-) diff --git a/EgtInterface.vb b/EgtInterface.vb index 98ad0a6..a6f5ca2 100644 --- a/EgtInterface.vb +++ b/EgtInterface.vb @@ -3176,16 +3176,16 @@ Public Function EgtExplodeCurveCompo(nId As Integer, ByRef nCount As Integer) As End Function -Private Function EgtMergeCurvesInCurveCompo_32(nId As Integer, dLinTol As Double) As Boolean +Private Function EgtMergeCurvesInCurveCompo_32(nId As Integer, dLinTol As Double, bStartEnd As Boolean) As Boolean End Function -Private Function EgtMergeCurvesInCurveCompo_64(nId As Integer, dLinTol As Double) As Boolean +Private Function EgtMergeCurvesInCurveCompo_64(nId As Integer, dLinTol As Double, bStartEnd As Boolean) As Boolean End Function -Public Function EgtMergeCurvesInCurveCompo(nId As Integer, dLinTol As Double) As Boolean +Public Function EgtMergeCurvesInCurveCompo(nId As Integer, dLinTol As Double, Optional bStartEnd As Boolean = True) As Boolean If IntPtr.Size = 4 Then - Return EgtMergeCurvesInCurveCompo_32(nId, dLinTol) + Return EgtMergeCurvesInCurveCompo_32(nId, dLinTol, bStartEnd) Else - Return EgtMergeCurvesInCurveCompo_64(nId, dLinTol) + Return EgtMergeCurvesInCurveCompo_64(nId, dLinTol, bStartEnd) End If End Function diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb index f10a931..0151212 100644 --- a/My Project/AssemblyInfo.vb +++ b/My Project/AssemblyInfo.vb @@ -46,5 +46,5 @@ Imports System.Runtime.InteropServices ' utilizzando l'asterisco (*) come descritto di seguito: ' - - + +