EgtCAM5 :
- Implementato uso della EgtSaveFileDialog da EgtWPFLib5. - Abbozzata gestione dei file per GunStock. - Aggiunta virtualizzazione dell'albero dei layer. - Corretta visualizzazione pallini colorati nell'albero dei layer. - Miglioramenti nel salvataggio delle MTable e selezione di quella corrente. - Aggiunto colore Egaltech1 in IniFile per poterlo usare da codice.
This commit is contained in:
+2
-2
@@ -159,7 +159,7 @@ Namespace EgtCAM5
|
||||
Me.HeaderName = HeaderName
|
||||
End Sub)
|
||||
Application.Msn.Register(Application.UPDATEHEADERCOLOR, Sub(HeaderColor As Color3d)
|
||||
Me.HeaderColor = New SolidColorBrush(Color.FromArgb(CByte(HeaderColor.A), CByte(HeaderColor.R), CByte(HeaderColor.G), CByte(HeaderColor.B)))
|
||||
Me.HeaderColor = New SolidColorBrush(Color.FromArgb(CByte(HeaderColor.A * 255 / 100), CByte(HeaderColor.R), CByte(HeaderColor.G), CByte(HeaderColor.B)))
|
||||
End Sub)
|
||||
Application.Msn.Register(Application.UPDATEOBJTREEOLDID, Sub(ObjTreeOldId As Integer)
|
||||
Me.m_nObjTreeOldId = ObjTreeOldId
|
||||
@@ -737,7 +737,7 @@ Namespace EgtCAM5
|
||||
End If
|
||||
|
||||
Dim nObjs As Integer = EgtGetGroupObjs(nGroupId)
|
||||
If (nObjs > 20000) Then
|
||||
If (nObjs > 275000) Then
|
||||
Dim sText As String = "Too many entities (" + nObjs.ToString() + ")"
|
||||
CurrNodColl.Add(New LayerTreeViewItem(GDB_ID.NULL, sText))
|
||||
Return
|
||||
|
||||
Reference in New Issue
Block a user