EgtCAM5 3.1h1 :
- per utenti interni aggiunta possibilità di configurare da Options il formato di salvataggio del DB geometrico.
This commit is contained in:
@@ -16,6 +16,8 @@ Friend Module OptionModule
|
||||
Friend m_ShowSurfQuality As SceneSurfQualityOpt
|
||||
' Tipo di visualizzazione delle Zmap
|
||||
Friend m_nShowZmapType As Integer
|
||||
' Formato di salvataggio del progetto
|
||||
Friend m_nGeomDBSaveType As NGE
|
||||
|
||||
' Colore di default in disegno
|
||||
Friend m_DefMaterialColor As Color3d
|
||||
@@ -122,6 +124,9 @@ Friend Module OptionModule
|
||||
m_ShowSurfQuality = DirectCast( Math.Min( Math.Max( nSSQ, -2), 2), SceneSurfQualityOpt)
|
||||
' Inizializzo tipo di visualizzazione Zmap
|
||||
m_nShowZmapType = GetPrivateProfileInt(S_SCENE, K_SHOWZMAP, 9)
|
||||
' Inizializzo formato di salvataggio del progetto
|
||||
Dim nGST As Integer = GetPrivateProfileInt(S_GEOMDB, K_SAVETYPE, NGE.CMPTEXT)
|
||||
m_nGeomDBSaveType = DirectCast( Math.Min( Math.Max( nGST, 0), 3), NGE)
|
||||
' Inizio colore di default in disegno
|
||||
Dim DefColor As New Color3d(0, 0, 0)
|
||||
GetPrivateProfileColor(S_GEOMDB, K_DEFAULTCOLOR, DefColor)
|
||||
|
||||
Reference in New Issue
Block a user