Переключает редактор карты в режим ввода типового объекта с указанным типом и режимом.
Visual Basic:
Function SetInputModeByType(nType As Long, nMode As Long) As Long
nType - ID типа вводимого объекта.
nMode - номер режима вводимого объекта.
Если редактор карты в данный момент работает (свойство MapDoc.Layers.EditLayer - не пустой объект) и в структуре редактируемого слоя присутствует указанный тип, с указанный режимом, редактор переключится в режим ввода типового объекта с таким типом и режимом. В этом случае метод вернет 0. В противном случае метод вернет -1.
В зависимости от графического типа вводимого объекта, редактор перейдет в один из режимов (см. MapDoc.EditMode):
для площдных объектов: eEditModePolygon.
для площдных объектов: eEditModePolyline.
для символьных объектов: eEditModeSymbol.
Dim st As ElemStyle 'Если редактор карты включен If TypeName(MapCtrl1.Map.Layers.EditLayer) <> "Nothing" Then 'Получаем текущий стиль примитивов редактора Set st = MapCtrl1.Map.GetInputStyle 'Устанавливаем красный цвет заливки полигонов st.PatColor = 255 MapCtrl1.Map.SetInputStyle st End If