Egalware/EgtWPFLib5
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

EgtWPFLib5 2.7i1 :

Browse Source 
- piccoli aggiustamenti estetici.
This commit is contained in:
Dario Sassi
2025-09-30 08:26:37 +02:00
parent 186de5b74d
commit d6edfe5c01
2 changed files with 20 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
MachiningDbWindow/MachiningTreeView.vb
+18 -3
View File
@@ -871,9 +871,19 @@ Public Class MachiningTreeViewItem
End Property
'ObservableCollection che contiene le variabili per il combobox ExtLinkType
Private m_ExtLinkTypeList As New ObservableCollection(Of Object)({New IdNameStruct(MCH_SAW_EL.CENT, EgtMsg(31320)), New IdNameStruct(MCH_SAW_EL.EXT_PREV, EgtMsg(31334)), New IdNameStruct(MCH_SAW_EL.EXT_NEXT, EgtMsg(31335)), New IdNameStruct(MCH_SAW_EL.EXT_BOTH, EgtMsg(31336))}) ' Centro - stendi precedente - Estendi successivo - Estendi entrambi
Private m_ExtLinkTypeList As New ObservableCollection(Of Object)
Public ReadOnly Property ExtLinkTypeList As ObservableCollection(Of Object)
Get
Select Case m_Type
Case MCH_MY.SAWING
m_ExtLinkTypeList = New ObservableCollection(Of Object)(
{New IdNameStruct(MCH_SAW_EL.CENT, EgtMsg(31320)), ' Centro
New IdNameStruct(MCH_SAW_EL.EXT_PREV, EgtMsg(31334)), ' Estendi precedente
New IdNameStruct(MCH_SAW_EL.EXT_NEXT, EgtMsg(31335)), ' Estendi successivo
New IdNameStruct(MCH_SAW_EL.EXT_BOTH, EgtMsg(31336))}) ' Estendi entrambi
Case Else
m_ExtLinkTypeList = Nothing
End Select
Return m_ExtLinkTypeList
End Get
End Property
@@ -1217,9 +1227,14 @@ Public Class MachiningTreeViewItem
Get
Select Case m_Type
Case MCH_MY.SAWROUGHING
m_LeadLinkTypeList = New ObservableCollection(Of Object)({New IdNameStruct(MCH_SAWROU_LL.CENT, EgtMsg(31320)), New IdNameStruct(MCH_SAWROU_LL.EXT, EgtMsg(31323))}) ' Centro - Estendi
m_LeadLinkTypeList = New ObservableCollection(Of Object)(
{New IdNameStruct(MCH_SAWROU_LL.CENT, EgtMsg(31320)), ' Centro
New IdNameStruct(MCH_SAWROU_LL.EXT, EgtMsg(31323))}) ' Estendi
Case MCH_MY.SAWFINISHING
m_LeadLinkTypeList = New ObservableCollection(Of Object)({New IdNameStruct(MCH_SAWFIN_LL.STD, EgtMsg(31324)), New IdNameStruct(MCH_SAWFIN_LL.CENT, EgtMsg(31320)), New IdNameStruct(MCH_SAWFIN_LL.EXT, EgtMsg(31323))}) ' Standard - Centro - Estendi
m_LeadLinkTypeList = New ObservableCollection(Of Object)(
{New IdNameStruct(MCH_SAWFIN_LL.STD, EgtMsg(31324)), ' Standard
New IdNameStruct(MCH_SAWFIN_LL.CENT, EgtMsg(31320)), ' Centro
New IdNameStruct(MCH_SAWFIN_LL.EXT, EgtMsg(31323))}) ' Estendi
Case Else
m_LeadLinkTypeList = Nothing
End Select
My Project/AssemblyInfo.vb
+2 -2
View File
@@ -62,5 +62,5 @@ Imports System.Windows
' by using the '*' as shown below:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.7.8.1")>
<Assembly: AssemblyFileVersion("2.7.8.1")>
<Assembly: AssemblyVersion("2.7.9.1")>
<Assembly: AssemblyFileVersion("2.7.9.1")>