EgtDOORCreator 1.9a2 :

- aggiunta nel file Config.ini del flag SmartHelp per abilitare la richiesta di lettura degli script legati alla pagina Help.
This commit is contained in:
Nicola Pievani
2018-01-18 11:45:49 +00:00
parent 8302ff6392
commit 23785f7aff
4 changed files with 22 additions and 9 deletions
+16 -6
View File
@@ -33,6 +33,8 @@ Friend Module OptionModule
Assembly = 1
End Enum
Friend m_SmartHelp As Boolean = False
Friend m_Width As String
Friend m_Height As String
Friend m_Thickness As String
@@ -189,6 +191,14 @@ Friend Module OptionModule
End If
End If
Dim nSmartHelp As Integer = 1
nSmartHelp = GetMainPrivateProfileInt(S_GENERAL, K_SMARTHELP, 1)
If nSmartHelp = 0 Then
m_SmartHelp = True
Else
m_SmartHelp = False
End If
' leggo il tipo di Bevel selezionato
Dim BevelUp As Visibility
DefaultGetPrivateProfilesBevel(S_EDGE, K_BEVELU_INI, BevelUp)
@@ -199,12 +209,12 @@ Friend Module OptionModule
'disposizione in macchina delle porte (variabile globale)
Select Case GetMainPrivateProfileInt(S_GENERAL, K_DISPOSITION, 0)
Case 0
m_Disposition.Name = "BySwing"
Case 1
m_Disposition.Name = "BD"
Case 2
m_Disposition.Name = "BU"
Case 0
m_Disposition.Name = "BySwing"
Case 1
m_Disposition.Name = "BD"
Case 2
m_Disposition.Name = "BU"
End Select
' questa variabile deve essere usata solo in locale per settare la visibilità della optionpage dei bevel
m_sDisposition = m_Disposition.Name