diff --git a/EgtBEAMWALL.Core/Integration/CalcIntegration.vb b/EgtBEAMWALL.Core/Integration/CalcIntegration.vb index 5db735ba..c3914ef0 100644 --- a/EgtBEAMWALL.Core/Integration/CalcIntegration.vb +++ b/EgtBEAMWALL.Core/Integration/CalcIntegration.vb @@ -75,6 +75,8 @@ Public Module CalcIntegration ' Numero di core logici da utilizzare (minimo tra presenti sul PC e imposti da INI) Dim nMaxThread As Integer = Math.Min(Environment.ProcessorCount, m_MaxCamInstances) + Array.Resize(Of Bar)( vBar, numBars + nMaxThread - 1) + ' Frazione di avanzamento del lavoro (in piu) Dim dProgress As Double = 0 'indice incremento progress durante calcolo barra diff --git a/EgtBEAMWALL.Core/My Project/AssemblyInfo.vb b/EgtBEAMWALL.Core/My Project/AssemblyInfo.vb index 3ad0b6b0..f0b70e32 100644 --- a/EgtBEAMWALL.Core/My Project/AssemblyInfo.vb +++ b/EgtBEAMWALL.Core/My Project/AssemblyInfo.vb @@ -35,5 +35,5 @@ Imports System.Runtime.InteropServices ' by using the '*' as shown below: ' - - + +