Алексей Аширов (Все сообщения пользователя)

Пропускная способность K полностью открытого регулятора задается в кубометрах в час.  Гидравлическое сопротивление при этом определяется как 10/(K*K)

Если от ЦТП не прорисовывается сеть ГВС, то нагрузка ГВС на ЦТП задается общая, а не на какую-то ступень.

В карте параметр прозрачности не сохранялся. Скачайте обновление, будет сохраняться. На дату версии на сайте не обращайте внимания. Исправления в обновлении сегодняшние.

Это связано с недавно допущенной ошибкой. Сегодня исправим.

Чтобы панель редактора была активна, она должна
1. Знать, что она связана с каким-то окном карты
MapEditCtrl1.MapCtrlName  := Mapctrl1.Name;

2. В этой карте должне быть редактируемый слой, например:
Mapctrl1.Map.layers.EditLayer :=Mapctrl1.Map.layers.Active

Там путь немножко длиннее. Сперва получаем стиль, заполняем его и обратно присваиваем.

var es: IElemStyle;

es := MapCtrl1.Map.Layers.item[7].ObjectTypes.Item[6].Modes.Item[1].ElemStyle;
es.Linewidth:=1;
es.Linestyle:=1;
MapCtrl1.Map.Layers.item[7].ObjectTypes.Item[6].Modes.Item[1].ElemStyle := es;

Редактор символов создает новые и редактирует существующие символы. А редактора стилей линий у нас в системе вообще нет.
Штатного диалога выбора стиля линии пока в объектной модели тоже нет.

Можно в месте подсоединения к камере низлежащую сеть от камеры отсоединить и поставить формальный источник, задать на нем желаемоый напор и температуру и считать сеть как обычно.

Видимо проблема в том, как заданы параметры задвижки. Либо степень открытия = 0, либо еще что-то. Пришлите сеть или ее фрагмент с этим ЦТП, посмотрим, ответим.

Вышлите обкусанный фрагмент слоя, в котором бы этот участок все-таки присутствовал.

uses
 ZuluOcx_TLB, Zululib_TLB, activex;

procedure TForm1.MapCtrl1MouseLeftDblClick(ASender: TObject;
 State: TOleEnum; X, Y: Integer; RealX, RealY: Double);

var elstyle: IElemStyle;
var Fd: IFontDisp;
var F: IFont;

begin

elstyle := CoElemStyle.Create;

Fd:=elstyle.Font;

Fd.QueryInterface(IFont, F);

F.put_Name('Courier New');

elstyle.Font := Fd;

elstyle.TextHeight := 2000;

MapCtrl1.Map.Layers.Active.AddText( RealX, RealY, '123456', elstyle);


end;

А на каком языке?

Не знаю. Сейчас проверил. Переименовываться переименовывается, а новый не оразуется. Там в коде переименования никаких упоминаний об образовании нового типа речь не идет. Посмотрите внимательно, может где-то вызывается ObjectTypes.AddItem

Если на ЦТП смешанная двухступенчатая или одноступенчатая параллельная, то сеть ГВС с циркуляционной линией можно прорисовывать от ЦТП и заканчивать потребителями со схемой N26. Подробно описывалось в
<A HREF="http://www.politerm.com.ru/zulu/news/whatsnew_2292.htm" target="_blank">http://www.politerm.com.ru/zulu/news/whatsnew_2292.htm</a>
Пример четырехтрубной сети есть в демоверсии на сайте.
Будут вопросы, пишите

Сейчас только самому собрать из этих отрезков PolyPolyline, его добавить в слой, а исходные отрезки удалить.
Либо, если отрезки связаны цепочкой, собрать из них PolyLine, и дальше тоже самое.

Создаем тип:
NewTypeID := Layer.ObjectTypes.AddItem...

Затем в него добавляемрежим:
Layer.ObjectTypes.tem[NewTypeID].Modes.AddItem...

Режим относится к какому-то типу.
У слоя коллекция типов, у каждого типа (TypeID) коллекция режимов (Modes). Среди них какой-то режим M1 со своим стилем ElemStyle

Layer.ObjectTypes.Item[TypeID].Modes.Item[M1].ElemStyle := telementstyle

Программа подбирает автоматически в наладке по тем данным, которые заведены и выдает она то, что должно при этих исходных данных в идеале получиться. К факту это никакого отношения не имеет.
Если программа требует 42 метра и это кажется слишком много, нужно выяснить причины (узкие места), почему требуется такой напор. Причины могут быть совершенно разные. И неверные нагрузки, и неверные диаметры, неверная топология сети, неверно заданы шероховатости, местные сопротивления и т.д.
В любом случае сравнивать напоры мало. Нужно еще и расходы сравнить. И чтобы сравнивать, нужно быть уверенным, что наладочная расчетная модель адекватна фактической сети.
Чтобы считать по факту, нужно выполнить поверочный расчет, занеся туда данные по установленным шайбам и соплам. Если в жизни у вас шайбы не стоят, то с наладкой факт и не сойдется никогда.

Как вариант при создании наверно можно сделать. Но изначально метки создавались как элемент оформления, когда объекты уже устаканились и их массовое перемещение закончено. А подвинуть несколько объектов и их метки казалось, все-таки несложно.

Может у вас в кэше где-то? Сейчас скачал с сайта - все нормально. Попробуйте с ftp.

Не очень понятно, почему Byte.  Экранные координаты не до 255. Они должны быть Word. А так ты их обрезаешь.
Экранный x подставляется в IMapView.GetRealY, а экранный у в IMapView.GetRealX, так как в координатах местности X вверх, а Y вправо.

Да вроде файлы от вчерашнего числа 17 вечера.
Zulu50Update.exe 6196977 17.07.06 17:23
А с кем он идентичен?

Посмотрел на работу с метками через объектную модель. Ошибки, касающиеся подключения-отключения меток подправил. Можно скачать обновление. Потестируйте. Может еще что-то вылезет.
Что касается пользовательских меток, когда несколько вариантов меток подключено к одному типу, тут существующими методами трудно обойтись. В существующих методах вывод адресован меткам указанного типа, а нужно бы адресовать вывод для конкретного варианта. Вряд ли имеет смысл для нескольких вариантов меток выводить на экран одно и тоже. Так что пока для UserLabel будет выводиться для какого-то одного варианта у каждого типа.
А вообще нужно нам сделать новое событие:
1. Чтобы UserLabel задавался каждому LabelLayer персонально (как уже сделано подключение-отключение Active.LabelLayers.ItemById(i).Enable, взамен LabelsID)
2. Чтобы событие приходило для каждого из помеченых как USerLabel=true свое. Тогда и обработка будет своя для каждого варианта меток.

У нас пока не совсем чертежная система и автоматического надписывания размеров не предусмотрено. Можете в своем приложении дописать обработку события, по которому бы выполнялся Ваш сценарий по рисованию выносной линии.

В принципе можно добавить метод, который бы задавал значение счетчика. Если очень нужно, вставим в план.

Задать самому, чему будет равен счетчик нельзя. Можно изменять программно ID элемента (Layer.ChangeElemID) Тогда, если задать значение ID большим значения счетчика, значение счетчика изменится. Но в сторону уменьшения нельзя.