OmagCUT 1.8d5 :
- corretta gestione Next in SplitPageUC - aggiunta possibilità di impostare ritardo tra reset e invio programma a controllo NUM Flexium - migliorata gestione gocciolatoio - selezione pezzo in nesting produce selezione dello stesso in VeinMatching.
This commit is contained in:
+14
-3
@@ -21,6 +21,9 @@ Public Class CurrentMachine
|
||||
' Incremento da dare all'asse C per far coincidere la linea della lama con l'asse X
|
||||
Private m_dDeltaC As Double = 0
|
||||
|
||||
' Ritardo tra reset e invio programma per NUM
|
||||
Private m_nResetSendDelay As Integer = 1000
|
||||
|
||||
' Dati su linea di produzione
|
||||
Private m_bProdLine As Boolean = False
|
||||
Private m_sVarProg1 As String = "E80021"
|
||||
@@ -92,7 +95,7 @@ Public Class CurrentMachine
|
||||
Private m_ManualToolChanger As New List(Of ToolChangerPos)
|
||||
|
||||
' Lista dei materiali
|
||||
Private m_Materials As New observablecollection(Of Material)
|
||||
Private m_Materials As New ObservableCollection(Of Material)
|
||||
|
||||
' Massimo id della lista materiali nel file ini
|
||||
Private m_MaxIdMat As Integer = 0
|
||||
@@ -150,6 +153,12 @@ Public Class CurrentMachine
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Friend ReadOnly Property nResetSendDelay As Integer
|
||||
Get
|
||||
Return m_nResetSendDelay
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Friend ReadOnly Property bProdLine As Boolean
|
||||
Get
|
||||
Return m_bProdLine
|
||||
@@ -603,11 +612,13 @@ Public Class CurrentMachine
|
||||
m_sMachDir = m_MainWindow.GetMachinesRootDir & "\" & sMachineName
|
||||
' Impostazione path MachIni file
|
||||
m_sMachIniFile = m_MainWindow.GetMachinesRootDir & "\" & sMachineName & "\" & sMachineName & ".ini"
|
||||
' Leggo flag incremento asse C
|
||||
m_dDeltaC = GetPrivateProfileDouble(S_AXES, K_DELTA_C, 0.0, sMachIniFile)
|
||||
' Leggo estensione del file programma pezzo
|
||||
GetPrivateProfileString(S_PARTPROGRAM, K_EXTENSION, "xpi", m_sIsoFileExt, sMachIniFile)
|
||||
If m_sIsoFileExt(0) <> "." Then m_sIsoFileExt = "." & m_sIsoFileExt
|
||||
' Leggo flag incremento asse C
|
||||
m_dDeltaC = GetPrivateProfileDouble(S_AXES, K_DELTA_C, 0.0, sMachIniFile)
|
||||
' Leggo ritardo tra reset e send per NUM
|
||||
m_nResetSendDelay = GetPrivateProfileInt(S_NCNUM, K_RESETSENDDELAY, 1000, sMachIniFile)
|
||||
' Leggo se linea di produzione e parametri relativi
|
||||
m_bProdLine = (GetPrivateProfileInt(S_PRODUCTIONLINE, K_ACTIVE, 0, sMachIniFile) <> 0)
|
||||
If m_bProdLine And Not m_MainWindow.GetKeyOption(MainWindow.KEY_OPT.PROCUCTION_LINE) Then
|
||||
|
||||
Reference in New Issue
Block a user