Добавляет в модель сети объект для описания нового насоса.

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

ZCNNetworkCtrl (ZCNNetwork)

Синтаксис:

Visual Basic:

Function AddPumpDef(Name As String) As IZCNPumpDef

Name - строковый идентификатор насоса

Описание:

Используя возвращаемый методом объект IZCNPumpDef можно задать QH характеристику и другие параметры насоса.

Пример:

Dim NW As ZCNNetwork
'Создаем сеть
Set NW = New ZCNNetwork

Dim pump As IZCNPumpDef
'Добавляем в сеть описатель насоса
Set pump = NW.AddPumpDef("Насос-1")
'Задаем точки QH характеристики
pump.AddPoint 6, 21
pump.AddPoint 10, 19
pump.AddPoint 16, 13
'Добавляем в сеть объект "Насос"
NW.AddObject 5, 4, 1, -1, -1, 0
'Задаем для этого объекта марку насоса на подающем (тепловая сеть)
NW.SetAttrValue 5, "Mark_pod", "Насос-1"