Grin471- (Все сообщения пользователя)

Лицензии ZuluNetTools нет . Но все равно , тогда должен выдать ошибку под Кодом 200 , согласно справке

В том то и дело , что большая сеть при ручном расчёте показывает ошибки , типа : недостаточно давления на потребители и др.
также пробывал автоматически менять параметры шероховатости и запускать расчёт  , чтобы посмотреть изменения . Итог расчёт не проходит , так как параметры давления не изменяются. Почему расчёт не проходит не понятно

Запускаю макрос для расчёта "маленькой" сети (до 100 элементов) и "Большой" сети (более 10000 эл).
Обе сети содержат ошибки.
При расчете маленькой MsgBox task1.Errors.Count выдает количество ошибок.
При расчёте "большой" количество ошибок - 0, исходя из чего делаю вывод, что расчёт не проходит.

Опять же с тем же вопросом.
Написал макрос, который запускает расчет, однако работает он только для "маленькой" сети (до 100 элементов).
Запустить расчёт для "Большой" сети ( более 10000 элементов) почему то не получается.
При этом ошибок в ZCNTaskHydro не появляется. Не пойму в чем дело.
Ниже текст макроса.

Public Sub РасчетZulu (PathZulu As String)

Dim NW As ZCNNetwork

Set NW = New ZCNNetwork

Set task1 = New ZCNTaskHydro

task1.Network = NW

task1.NetworkCtrlName = NW.OpenNetwork(PathZulu, 2)

task1.Run 1, True

'обработка ошибок

Dim i As Long

Dim err_code As Boolean

err_code = False

For i = 0 To task1.Errors.Count - 1

Select Case task1.Errors.Item(i).Code

Case task1.Errors.Item(i).Code >0

       err_code = True

       MsgBox ("Код:" + Str(task1.Errors.Item(i).Code) + " Объект & Str(task1.Errors.Item(i).Key) +"Поле:" & task1.Errors.Item(i).Name)

End Select

Next i

If err_code = True Then MsgBox ("Ошибки!")

End Sub

В эту тему в виде сообщения пытаюсь выложить текст макроса !)
Почему то это не получается!)

А как посчитать в темную ?

Здравствуйте!
Подскажите пожалуйста! Хотелось бы создать макрос, который открывал ZuluHidro, выбирал слой для расчета и запускал расчет.
Не нашел этого в объектной модели в справке кроме: Zulu.RunCommand ("Voda.OpenForm").

Здравствуйте!
Подскажите пожалуйста! Хотелось бы создать макрос, который открывал ZuluHidro, выбирал слой для расчета и запускал расчет.
Не нашел этого в объектной модели в справке кроме: Zulu.RunCommand ("Voda.OpenForm").

Заметил ошибку при экспорте профиля в DXF!
При нанесении трассы коллектора в мировых координатах (WGS 84) и дальнейшем экспорте профиля, длина участков берется из свойства объекта: "Длина,м", а не из "Длина на сфероиде ,м" , из-за чего длина трассы на профиле увеличивается в 2 раза. Прошу исправить ошибку.

Здравствуйте!
Попробовал новую функцию экспорта профиля в DXF. Очень понравилась!
Однако не понял почему у меня не показываются пересечения на профиле.
Попробовал  "пощелкать" в меню создания профиля, во вкладке "Пересечения", но там почему то ни чего нельзя выбрать.
Было бы очень хорошо, если бы Вы выложили видеоурок на сайт.