-piccola modifica cariamento variant

2025-01-23 10:20:07 +01:00
parent 616e1fba47
commit 6c580fecdb
1 changed files with 7 additions and 0 deletions
@@ -399,6 +399,13 @@ Public Class BTLFeatureM
         TempList.Add(NewBTLParam)
         ParamIndex += 1
      End While
+      If TempList.Count <= 0 Then
+         nSelVARIANT = 0
+         While BTLIniFile.GetBeamPrivateProfileParam(m_nSelGRP, m_nPRC, nSelVARIANT, True, ParamIndex, Me, NewBTLParam)
+            TempList.Add(NewBTLParam)
+            ParamIndex += 1
+         End While
+      End If
      NewBTLFeature.PBTLParamMList = TempList
      ' leggo tutti i Q della feature
      ParamIndex = 1