TestEIn 1.5j6 :
- notevoli miglioramenti a disegno e gestione pezzi/layer.
This commit is contained in:
+3
-3
@@ -10,7 +10,7 @@ Public Class SelectMulti
|
||||
ListBox1.BeginUpdate()
|
||||
'Inserisco le entità nel mirino
|
||||
Dim nId = EgtGetFirstObjInSelWin()
|
||||
While nId <> GDB_ID_NULL
|
||||
While nId <> GDB_ID.NULL
|
||||
Dim sTitle As String = String.Empty
|
||||
EgtGetTitle(nId, sTitle)
|
||||
If EgtIsSelectedObj(nId) Then
|
||||
@@ -22,10 +22,10 @@ Public Class SelectMulti
|
||||
nId = EgtGetNextObjInSelWin()
|
||||
End While
|
||||
'Inserisco None per non selezionare alcunchè
|
||||
Dim smNone As New SelMulItem("None", GDB_ID_NULL)
|
||||
Dim smNone As New SelMulItem("None", GDB_ID.NULL)
|
||||
ListBox1.Items.Add(smNone)
|
||||
ListBox1.EndUpdate()
|
||||
m_nCurrEnt = GDB_ID_NULL
|
||||
m_nCurrEnt = GDB_ID.NULL
|
||||
ListBox1.SelectedIndex = 0
|
||||
End Sub
|
||||
|
||||
|
||||
Reference in New Issue
Block a user