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

Сервер и клиентскую часть обновили. тематическая расскраска не добавляется не вручную (через zulu) не программно

отправила

ваш код.единственное что я поменяла это открытие своего слоя , изменяю не стиль заливки а цвет и свой id написала
Set T = CreateObject("zululib.Theme")
Set L = CreateObject("zululib.Layer")
L.Open MapCtrl3.Map.Layers.Item(Me.swlayer.Column(1)).Name
T.Parameter(16145, eThemePatColor) = RGB(0, 51, 255)
T.UserName = "bbbbbb"
id = L.Themes.AddTheme(T)
L.Themes.SetEnabled id, True
MsgBox id

я уже и так на локальной работаю. на диске раскраска появляется, а на карте нет. GetEnabled возвращает true

MsgBox  возвращает наименование слоя.но раскраски нет
Скажите чтоб раскраска применилась нужны какие то дополнительные права на сервере  zulu? или это может делать любой пользователь с правами просмотра

что то совсем ни как... скажите, чтобы открыть слой, нужно приписать путь до него
L.Open MapCtrl3.Map.Layers.Item(4).Name вот так?
или нужно обязательно  L.Open "zulu://....."

Версия 7.0.0.5367

Set T = CreateObject("zululib.Theme")
 Set L = CreateObject("zululib.Layer")

 L.Open MapCtrl3.Map.Layers.Item(4).Name

 subOpenRs1 "SELECT * from tb "
         Do Until rsRs1.EOF
           T.Parameter(rsRs1!idZulu, eThemeFillStyle) = 2
           T.Parameter(rsRs1!idZulu, eThemePatColor) = RGB(0, 51, 255)
           rsRs1.MoveNext
       Loop

       T.UserName = "пример темы"
  id = L.Themes.AddTheme(T)  
MapCtrl3.Map.Layers.Item(4).Themes.UpdateTheme (id)

id всегда -1 и раскраски не происходит

немного не понятно, а как теперь ее подключит к слою?UpdateTheme? как определить id раскраски?

Добрый день.Подскажите имеет ли значение где создавать файл тематической раскраски? я создаю так
   subOpenRs1 "SELECT * from tbobject "
       theme.Create CurrentProject.Path & "\" & "tmp.ztm", "tmp", MapCtrl3.map.Layers.Active.Name
      Do Until rsRs1.EOF
           theme.Parameter(rsRs1!idZulu, eThemeLineColor) = 255
           theme.Parameter(rsRs1!idZulu, eThemeLineWidth) = 2
       rsRs1.MoveNext
       Loop
       theme.Save
       MapCtrl3.map.Layers.Active.ThemeName = CurrentProject.Path & "\" & "tmp.ztm"
на локальной карте все работает. но при обращении к сетевой карте закраска не происходит.

отправила

изменение ключа - было одно ключевое поле (sys) , нужно что бы ключевым полем стало поле (isys)
пробовала без удаления старого ключа в запросе изменила поле связи с картой.Результат один и тот же

Добрый день.Возникла необходимость изменения ключевого поля. В редакторе баз данных выбираю нужную таблицу/ реструктурировать. Изменяю ключевое поле, удаляю старое и переименовываю.Изменяю запрос. Но при клике на слое и вызове семантических данных - пишет не данных. Подскажите возможно ли изменение ключа и какова последовательность действий?

Да, но на самом сервере в списке установленных программ появилось 2 строчки ZuluServer7.0 установленный девятьсот лохматом году и ZuluServer7.0 сего года (это критично или надо было с начало 6й удалять?)

Добрый день!Обновили ZULU сервер до версии 7.0.Перестал работать метод NetWorkRecalc.
При переключении задвижки не выводит потребителей состояние которых изменилось. В 6.0 все работало. В чем может быть ошибка?

А почему? Ведь в зависимости от того какая схема подключения зависит считать ли объем воды в системе гвс, системе отопления....

расчет объема воды в системе отопления, вентиляции и ГВС в следствие отключения объектов сети

Добрый день.Скажите зависит ли расчет производимый в модуле "Коммутационные задачи" от способа подключения потребителей?

с отключающими устройствами разобралась.
Остается вопрос как определить находится ли выбранный участок в кольце или нет

Да это он

Добрый день пытаюсь найти отключающие устройства так
Zadv = MapCtrl1.Map.Layers.Active.GetCuttingNodes(ElemID, 1) где ElemID выделенный объект.
вылетает ошибка. что не так я делаю?
и второй вопрос.как определить находится ли выбранный участок в кольце? через FindLoops?