Aggiornata versione a 2.7f1

This commit is contained in:
Dario Sassi
2025-06-12 20:34:31 +02:00
parent c6a77355a4
commit dc51159ca1
4 changed files with 9 additions and 30 deletions
+2 -2
View File
@@ -175,8 +175,8 @@ Public Class MainWindowM
GenInterface.GetPrivateProfileString(S_LICENCE, K_KEY, "", sKey, sLicFile)
EgtSetKey(sKey)
' Recupero livello e opzioni della chiave
Dim bKey As Boolean = EgtGetKeyLevel(7375, 2610, 1, m_nKeyLevel) And
EgtGetKeyOptions(7375, 2610, 1, m_nKeyOpt1, m_nKeyOpt2)
Dim bKey As Boolean = EgtGetKeyLevel(7375, 2706, 1, m_nKeyLevel) And
EgtGetKeyOptions(7375, 2706, 1, m_nKeyOpt1, m_nKeyOpt2)
If Not bKey Then
EgtOutLog("Key or Licence Problem (" & (-nKeyLevel).ToString() & ")")
-21
View File
@@ -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()
+3 -3
View File
@@ -15,7 +15,7 @@ Imports System.Windows
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("Egalware s.r.l.")>
<Assembly: AssemblyProduct("Effector")>
<Assembly: AssemblyCopyright("Copyright © 2024 by Egalware s.r.l.")>
<Assembly: AssemblyCopyright("Copyright © 2024-2025 by Egalware s.r.l.")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(false)>
@@ -55,5 +55,5 @@ Imports System.Windows
' by using the '*' as shown below:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.6.5.1")>
<Assembly: AssemblyFileVersion("2.6.5.1")>
<Assembly: AssemblyVersion("2.7.6.1")>
<Assembly: AssemblyFileVersion("2.7.6.1")>
@@ -13,9 +13,9 @@ Imports System.Windows
<Assembly: AssemblyTitle("Effector.Plugin.Interface")>
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("Windows User")>
<Assembly: AssemblyCompany("Egalware s.r.l.")>
<Assembly: AssemblyProduct("Effector.Plugin.Interface")>
<Assembly: AssemblyCopyright("Copyright @ Windows User 2024")>
<Assembly: AssemblyCopyright("Copyright @ 2024-2025 by Egalware s.r.l.")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(false)>
@@ -55,5 +55,5 @@ Imports System.Windows
' by using the '*' as shown below:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>
<Assembly: AssemblyVersion("2.7.6.1")>
<Assembly: AssemblyFileVersion("2.7.6.1")>