Egalware/icarus
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Icarus 2.7a4 :

Browse Source 
- modifica per nuova impostazione di SetAdvImpTolerance oltre a SetSurfTmTolerance.
This commit is contained in:
Dario Sassi
2025-01-31 09:27:23 +01:00
parent e65a5a7b4b
commit 5a3a36c02d
3 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Icarus/My Project/AssemblyInfo.vb
+2 -2
View File
@@ -70,5 +70,5 @@ Imports System.Windows
' by using the '*' as shown below:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.7.1.2")>
<Assembly: AssemblyFileVersion("2.7.1.2")>
<Assembly: AssemblyVersion("2.7.1.4")>
<Assembly: AssemblyFileVersion("2.7.1.4")>
Icarus/OptionsWindow/OptionWindowVM.vb
+1
View File
@@ -147,6 +147,7 @@ Public Class OptionWindowVM
If StringToLen(value, dVal) AndAlso dVal > 0 Then
OptionModule.m_dGeometryTolerance = dVal
Map.refSceneHostVM.MainController.SetSurfTmTolerance(OptionModule.m_dGeometryTolerance)
Map.refSceneHostVM.MainController.SetAdvImpTolerance(OptionModule.m_dGeometryTolerance)
WriteMainPrivateProfileString(S_GEOMDB, K_SURFTMTOLER, DoubleToString(OptionModule.m_dGeometryTolerance, 5))
End If
End Set
Icarus/SceneHost/MySceneHostVM.vb
+1
View File
@@ -203,6 +203,7 @@ Public Class MySceneHostVM
' Impostazioni Controller
MainController.SetScene(MainScene)
MainController.SetSurfTmTolerance(OptionModule.m_dGeometryTolerance)
MainController.SetAdvImpTolerance(OptionModule.m_dGeometryTolerance)
MainController.SetUseCustomColors(True, S_SCENE, K_CUSTOMCOLORS)
' imposto unità di misura per interfaccia utente
Dim bMmUnits As Boolean = GetMainPrivateProfileInt(S_SCENE, K_MMUNITS, 1) <> 0