Aggiornata versione a 2.7f1
This commit is contained in:
@@ -165,27 +165,6 @@ Public Class MainWindowVM
|
||||
' Creo Model della MainWindow
|
||||
m_MainWindowM = New MainWindowM
|
||||
|
||||
'' Gestione della chiave di protezione
|
||||
'Dim sLicFileName As String = ""
|
||||
'GetMainPrivateProfileString(S_GENERAL, K_LICENCE, LIC_FILE_NAME, sLicFileName)
|
||||
'Dim sLicFile As String = m_MainWindowM.sConfigDir & "\" & sLicFileName
|
||||
'Dim sKey As String = ""
|
||||
'GenInterface.GetPrivateProfileString(S_LICENCE, K_KEY, "", sKey, sLicFile)
|
||||
'EgtSetKey( sKey)
|
||||
'' Recupero livello e opzioni della chiave
|
||||
'Dim nKeyLevel As Integer = 0
|
||||
'Dim nKeyOpt1 As Integer = 0
|
||||
'Dim nKeyOpt2 As Integer = 0
|
||||
'Dim bKey As Boolean = EgtGetKeyLevel(7375, 2610, 1, nKeyLevel) And
|
||||
' EgtGetKeyOptions(7375, 2610, 1, nKeyOpt1, nKeyOpt2)
|
||||
|
||||
'If Not bKey Then
|
||||
' EgtOutLog("Key or Licence Problem (" & (-nKeyLevel).ToString() & ")")
|
||||
' MessageBox.Show("Key or Licence Problem (" & (-nKeyLevel).ToString() & ")", "Error", MessageBoxButton.OK, MessageBoxImage.Error)
|
||||
' EgtOutLog("Exit")
|
||||
' End
|
||||
'End If
|
||||
|
||||
' creo gestore della comunicazione
|
||||
m_MachineManager = New MachineManager
|
||||
m_MachineManager.Init()
|
||||
|
||||
Reference in New Issue
Block a user