130e41ba9a
- Aggiunta gestione pannello macchina. - Aggiunti Db utensili e lavorazioni. - Aggiunte opzioni macchina. - Aggiunto menù recenti su apri progetto. - Aggiunte verifiche compatibilità tra Db utensili, Db lavorazioni, attrezzaggio, lavorazioni correnti, materiale e spessore. - Migliorie varie.
173 lines
3.9 KiB
VB.net
173 lines
3.9 KiB
VB.net
Imports EgtUILib
|
|
|
|
Public Class MyToolDbWindowVM
|
|
|
|
#Region "MESSAGES"
|
|
|
|
'Definizione dei messaggi della pagina
|
|
Public ReadOnly Property CorrTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 51)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property ExitParTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 52)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property TypeTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 53)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property CoolantTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 54)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property CornRadTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 55)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property DiamTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 56)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property TotDiamTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 57)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property FeedTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 58)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property EndFeedTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 59)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property StartFeedTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 60)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property TipFeedTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 61)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property LenTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 62)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property TotLenTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 63)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property MaxMatTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 64)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property LonOffsetTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 65)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property RadOffsetTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 66)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property SpeedTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 67)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property SideAngTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 68)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property MaxSpeedTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 69)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property ThickTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 70)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property MaxAbsorptionTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 71)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property MinFeedTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 72)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property DrawTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 73)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property HeadTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 74)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property NameParTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 75)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property UserNotesTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 76)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property TcPosTxBl As String
|
|
Get
|
|
Return EgtMsg(MSG_TOOLSDBPAGE + 77)
|
|
End Get
|
|
End Property
|
|
|
|
#End Region
|
|
|
|
End Class
|