OmagCUT :
- possibilità di avere valori assi sulla punta dell'utensile - corretta creazione liste per combo in pagina Macchina - spessore tavola addizionale ora gestito in CurrentMachine - sistemazioni varie.
This commit is contained in:
+5
-2
@@ -224,8 +224,8 @@ Public Class CurrentMachine
|
||||
Return m_dAdditionalTable
|
||||
End Get
|
||||
Set(value As Double)
|
||||
If WritePrivateProfileString(S_TABLE, K_ADDITIONALTABLE, value, sMachIniFile) Then
|
||||
m_sCurrMilling = value
|
||||
If WritePrivateProfileString(S_TABLE, K_ADDITIONALTABLE, DoubleToString(value, 3), sMachIniFile) Then
|
||||
m_dAdditionalTable = value
|
||||
End If
|
||||
End Set
|
||||
End Property
|
||||
@@ -449,6 +449,9 @@ Public Class CurrentMachine
|
||||
m_ManualToolChanger.Add(New ToolChangerPos(Index, sName, sTool))
|
||||
Next
|
||||
|
||||
' Leggo altezza sopratavola
|
||||
m_dAdditionalTable = GetPrivateProfileDouble(S_TABLE, K_ADDITIONALTABLE, 0, sMachIniFile)
|
||||
|
||||
'Creo materiale di default e lo aggiungo alla lista
|
||||
'm_Materials.Add(New Material(0, "Generico"))
|
||||
' Leggo la lista dei materiali
|
||||
|
||||
Reference in New Issue
Block a user