EgtDOORCreator 1.8f4 :

- tante piccole sistemazioni.
This commit is contained in:
Dario Sassi
2017-06-21 13:21:21 +00:00
parent 2acf2cf7ba
commit e79b079c0e
10 changed files with 10 additions and 53 deletions
-9
View File
@@ -16,9 +16,6 @@ Friend Module OptionModule
Friend m_SelectedMeasureUnit As String
Friend m_bIsMmUnit As Boolean
' Path Guide directory
Friend m_GuideDir As String = String.Empty
' Paramaetri per la scelta del bevel
Friend m_bBevelUp As Visibility
Friend m_bBevelDown As Visibility
@@ -96,12 +93,6 @@ Friend Module OptionModule
nOptionLauncher = GetPrivateProfileInt(S_LAUNCHERWINDOW, K_LAUNCHER, 0)
End If
' leggo il direttorio della guida
Dim sGuideDir As String = String.Empty
If GetPrivateProfileString(S_GENERAL, K_GUIDEBROWSER, "", sGuideDir) <> 0 Then
m_GuideDir = sGuideDir
End If
' leggo il direttorio di salvataggio dei progetti
Dim sMyProjectDir As String = String.Empty
If GetPrivateProfileString(S_DOORS, K_MYPROJECTDIR, "", sMyProjectDir) <> 0 Then