RUS  ENG 

Рисование через макрос (версия Zulu 10.0.0.9383u)

Поиск  Правила  Войти
Страницы: 1
RSS
Рисование через макрос (версия Zulu 10.0.0.9383u), Построение объектов сети в слое
 
#1
23.10.2025 11:42:08
Добрый день.
Решаю задачу построения полелинии от заданного элемента.
Код
Set Lw = Zulu.ActiveMapDoc.Layers.GetItemByUserName("GAS")
Set Line = CreateObject("ZuluLib.PolyLine")
Line.AddPoint x, y
Line.AddPoint x, yN
Lw.AddSymbol x, yN , 6, 1
Lw.AddPolyLine Line, Nothing, 2, 1
Получаю на карте PolyLine между выделенным объектом (от которого надо было построить линию) до вновь добавленного объекта.
НО! Если я пытаюсь найти путь между элементами, то получаю "Путь не найден". Элементы при построении не связались друг с другом.
Точнее, PolyLine в конце не связалась с добавленным символом. В другой версии Zulu (не помню в какой) все работало.

Что делать, чтобы связать добавленные объекты друг с другом?
Изменено: Евгений Шадрин - 23.10.2025 11:48:50
 
 
 
#2
23.10.2025 13:49:48
Цитата
написал:
Добрый день.
Решаю задачу построения полелинии от заданного элемента.
Код
 Set Lw = Zulu.ActiveMapDoc.Layers.GetItemByUserName("GAS")
Set Line = CreateObject("ZuluLib.PolyLine")
Line.AddPoint x, y
Line.AddPoint x, yN
Lw.AddSymbol x, yN , 6, 1
Lw.AddPolyLine Line, Nothing, 2, 1
Получаю на карте PolyLine между выделенным объектом (от которого надо было построить линию) до вновь добавленного объекта.
НО! Если я пытаюсь найти путь между элементами, то получаю "Путь не найден". Элементы при построении не связались друг с другом.
Точнее, PolyLine в конце не связалась с добавленным символом. В другой версии Zulu (не помню в какой) все работало.

Что делать, чтобы связать добавленные объекты друг с другом?
Добрый день. А какие значения x, y, yN и т.д.? И какая версия. Пример себе сделал, вроде работает. Пришлите, пожалуйста, телефон для связи на aaa@politerm.com
 
 
 
#3
24.10.2025 05:21:28
Версия программы: 10.0.0.9383u x 86 Также проверил на 10.0.0.9383u x 64
Координаты получаю следующим образом:
Код
Set GetEl = L.Elements.GetElement(El) 
Set ElXY = GetEl.GetCenter 
x = ElXY.X 
y = ElXY.y 
yN = y + 0.0005

Обратил внимание, что если выставить значение y + 0.001, то элементы при построение связываются. Если установить, скажем + 0,0009 связь не устанавливается.
 
 
 
#4
24.10.2025 11:07:28
Цитата
написал:
Версия программы: 10.0.0.9383u x 86 Также проверил на 10.0.0.9383u x 64
Координаты получаю следующим образом:
Код
    Обратил внимание, что если выставить значение y + 0.001, то элементы при построение связываются. Если установить, скажем + 0,0009 связь не устанавливается.
Да, локально работало, через сервер не работало. Сейчас исправили. Обновление выложили

				

					
		

		

			
				

				 
				

					
			
				

 				

					
		

	
				
					

						
							
							 


								
					

				
			

		

	





	

			Страницы:
		1