@@ -72,6 +72,9 @@ Friend Class Config
7272 Public PARAM_CHECK As Boolean = False
7373 Public PARAM_MODE As String
7474 Public POPUP_POS As Int32 = 0
75+ Public POPUP_INOLTRO As Boolean = False
76+ Public POPUP_NEW_CALL As Boolean = False
77+ Public POPUP_INTERNI As Boolean = False
7578
7679 Public Commands As Hashtable = New Hashtable
7780 Public LANGUAGE As String = "default"
@@ -116,6 +119,8 @@ Friend Class Config
116119 "PARAM_CHECK=" & CStr (IIf( Me .PARAM_CHECK, "1" , "0" )) & vbCrLf &
117120 "PARAM_MODE=" & Me .PARAM_MODE & vbCrLf &
118121 "POPUP_POS=" & Me .POPUP_POS & vbCrLf &
122+ "POPUP_INOLTRO=" & CStr (IIf( Me .POPUP_INOLTRO, "1" , "0" )) & vbCrLf &
123+ "POPUP_INTERNI=" & CStr (IIf( Me .POPUP_INTERNI, "1" , "0" )) & vbCrLf &
119124 "LANGUAGE=" & Me .LANGUAGE & vbCrLf &
120125 "HOTKEY_MOD_SPEED_DIAL=" & Me .HOTKEY_MOD_SPEED_DIAL & vbCrLf &
121126 "HOTKEY_MOD_REDIAL=" & Me .HOTKEY_MOD_REDIAL & vbCrLf &
@@ -206,6 +211,10 @@ Friend Class Config
206211 P_POS = True
207212 Me .POPUP_POS = CInt (Val)
208213 X += 1
214+ ElseIf Key .StartsWith( "POPUP_INOLTRO=" ) Then
215+ Me .POPUP_INOLTRO = (Val = "1" )
216+ ElseIf Key .StartsWith( "POPUP_INTERNI=" ) Then
217+ Me .POPUP_INTERNI = (Val = "1" )
209218 ElseIf Key .StartsWith( "LANGUAGE=" ) Then
210219 Me .LANGUAGE = Val
211220 X += 1
0 commit comments