Изменяет группу выделенных объектов слоя по списку ключей объектов слоя.

Применяется к:

Selection

Синтаксис:

Visual Basic:

Sub Modify(What As eModifySelection, vKeys)

What - способ изменения группы

vKeys - переменная VARIANT со списком ключей объектов

В качестве VARIANT могут применяться числовой массив VT_ARRAY, а так же интерфейсы VT_DISPATCH и VT_UNKNOWN.

На данный момент поддерживаются интерфейсы ElementKeys и IZbDataset

Описание:

В случае подстановки IZbDataset подразумевается, что список ключей расположен в первой колонке.

Пример 1:

Visual Basic
'Выделяем объекты, заданные массивом
Private Sub Command2_Click(Layer1 As Layer)

dim arr(3) as long

arr(0) = 118
arr(1) = 116
arr(2) = 5
 
Layer1.Selection.ModifyEx eSelCreate, arr

End Sub

'Выделяем одиночный объект
Private Sub Command3_Click(Layer1 As Layer)

Layer1.Selection.ModifyEx eSelCreate, 118

End Sub
           

   

Пример 2:

VBScript
'Выделяем объекты по результату SQL запроса к слою

Const eSelCreate = 1

Sub SelectFromSql
       
Set Map = Zulu.ActiveMapDoc
        
Set L = Map.Layers.Active
        
Set SqlResult = L.ExecSQL ("SELECT Sys FROM [Gaz_ps] WHERE [Вид прокладки] = ""Подземная""")
        
Set Ds = SqlResult.DataSet
        
L.Selection.ModifyEx eSelCreate, DS
        
End Sub