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

EgtDOORCreator 1.8l8 :

Browse Source 
- migliorie varie a lettura/scrittura.
This commit is contained in:
Dario Sassi
2018-01-03 18:26:27 +00:00
parent 9f99979757
commit 00784e5477
17 changed files with 1050 additions and 1357 deletions
Download Patch File Download Diff File Expand all files Collapse all files
OptionsWindow/OptionsViewModel.vb
+3 -9
View File
@@ -40,16 +40,10 @@ Public Class OptionsVM
End Get
Set(value As String)
If value IsNot OptionModule.m_SelectedMeasureUnit Then
OptionModule.m_SelectedMeasureUnit = value
' inizializzo il valore dell'unità di misura
DdfFile.UnitMeasure = value
If value = OptionModule.m_MeasureUnitList(0) Then
OptionModule.m_bIsMmUnit = True
ElseIf value = OptionModule.m_MeasureUnitList(1) Then
OptionModule.m_bIsMmUnit = False
End If
OptionModule.m_bIsMmUnit = (value = OptionModule.m_MeasureUnitList(0))
EgtSetUiUnits(OptionModule.m_bIsMmUnit)
WriteMainPrivateProfileString(S_SCENE, K_MMUNITS, If(OptionModule.m_bIsMmUnit, 1, 0).ToString)
WriteMainPrivateProfileString(S_SCENE, K_MMUNITS, If(OptionModule.m_bIsMmUnit, "1", "0"))
OptionModule.m_SelectedMeasureUnit = value
End If
m_Chapter = "unit_measure"
End Set