[Shadow_elf1979]

Существует ли какой-нибудь скрипт, аналогичный Geomprops, но выводящий в свойствах выделенных блоков сумму их атрибутов по имени?
Например, есть группа светильников, каждый из которых представлен блоком с атрибутом "P" (мощность). Возможно ли сделать так, чтобы выводилась "в реальном времени", т.е. по отношению к выделенным объектам их суммарная "мощность"?

[Сергей812]

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

[Shadow_elf1979]

Не уверен, что это подходит - ключевое здесь - "в реальном времени". Т.е. выделено блоков 8 - одно число, добавили в выделение еще один - другое.
Ну и если такая есть, то хотелось бы конкретики где именно она есть и как ей разжиться )))

[kp+]

Сообщение от Shadow_elf1979 Не уверен, что это подходит - ключевое здесь - "в реальном времени"

"Влезть" в панель свойств просто так не получится, лисп для этого не годится, нужна "тяжелая артиллерия" ARX. Именно на нем написан Geomprops. Но т.к. соотношение задачи и средств ее решения на уровне "из крупнокалиберной пушки по воробьям", то с большой вероятностью, именно такой проги, как вам надо, нет. Совсем нет. Потому что никто не написал и вряд ли напишет.

[CTPAHHNK]

Команда ДАННЫЕИЗВЛ (DATAEXTRACTION)

[Сергей812]

и зачем влезать в панель свойств, когда можно вывести информацию прямо под нос пользователю?) На том же Net это делается элементарно

Код:

[Выделить все]

 
// Windows
using System;
using System.Globalization;

// AutoCAD
using aps = Autodesk.AutoCAD.ApplicationServices;
using dbs = Autodesk.AutoCAD.DatabaseServices;
using edi = Autodesk.AutoCAD.EditorInput;
using rtm = Autodesk.AutoCAD.Runtime;


namespace OutCountSelectObjects
{

    public class Commands : rtm.IExtensionApplication
    {
        private const string cNamePowerAttr = "P";

        private void DM_DocumentActivated(object sender, aps.DocumentCollectionEventArgs e)
        {
            if (e.Document != null) e.Document.Editor.PointMonitor += DocEd_PointMonitor;
        }


        private void DM_DocumentToBeDeactivated(object sender, aps.DocumentCollectionEventArgs e)
        {
            if (e.Document != null) e.Document.Editor.PointMonitor -= DocEd_PointMonitor;
        }


        private void DM_DocumentToBeDestroyed(object sender, aps.DocumentCollectionEventArgs e)
        {
            if (e.Document != null) e.Document.Editor.PointMonitor -= DocEd_PointMonitor;
        }


        private void DocEd_PointMonitor(object sender, edi.PointMonitorEventArgs e)
        {
            if (!(sender is edi.Editor lEd)) return;
            edi.PromptSelectionResult lSelRes = lEd.SelectImplied();
            if (lSelRes.Status == edi.PromptStatus.OK)
            {
                if (lSelRes.Value.Count > 0)
                {
                    int lCounter = 0;
                    double lPowerSum = 0;
                    using (dbs.Transaction lTr = lEd.Document.Database.TransactionManager.StartTransaction())
                    {
                        foreach (dbs.ObjectId lId in lSelRes.Value.GetObjectIds())
                        {
                            dbs.BlockReference lBR = lId.GetObject(dbs.OpenMode.ForRead) as dbs.BlockReference;
                            if ((lBR != null) && (lBR.AttributeCollection.Count > 0))
                            {
                                foreach (dbs.ObjectId lARId in lBR.AttributeCollection)
                                {
                                    using (dbs.AttributeReference lAR = 
                                        lARId.Open(dbs.OpenMode.ForRead, false, true) as dbs.AttributeReference)
                                    {
                                        if (lAR != null)
                                        {
                                            if ((lAR.Tag.Equals(cNamePowerAttr)) && (lAR.TextString.Length > 0) && 
                                                (double.TryParse(lAR.TextString.Replace(',', '.'), 
                                                    NumberStyles.Any, CultureInfo.InvariantCulture, out double lPower)))
                                            {
                                                lCounter++;
                                                lPowerSum += lPower;
                                                break;
                                            }
                                        }
                                    }
                                }
                            }
                        }
                        lTr.Commit();
                    }
                    if (lCounter > 0) e.AppendToolTipText($"Выделено светильников: {lCounter}; P = {lPowerSum} Вт");
                }
            }
        }
        

        public void Initialize()
        {
            aps.Application.DocumentManager.DocumentActivated += DM_DocumentActivated;
            aps.Application.DocumentManager.DocumentToBeDeactivated += DM_DocumentToBeDeactivated;
            aps.Application.DocumentManager.DocumentToBeDestroyed += DM_DocumentToBeDestroyed;
            aps.Document lDoc = aps.Application.DocumentManager.MdiActiveDocument;
            if(lDoc != null) lDoc.Editor.PointMonitor += DocEd_PointMonitor;
            if (Convert.ToInt32(aps.Application.GetSystemVariable("TOOLTIPS")) == 0)
            {
                aps.Application.SetSystemVariable("TOOLTIPS", 1);
            }
        }


        public void Terminate()
        {
        }

    }

}

и тогда в всплывающей подсказке (если есть блоки с атрибутом P, заполненным числом) выдаст мощность помимо информации от самого акада. Тип разделителя целой и дробной части в строке атрибута и крайние пробелы не влияют на распознавание числа.

----- добавлено через ~2 мин. -----

Сообщение от CTPAHHNK Команда ДАННЫЕИЗВЛ (DATAEXTRACTION)

извлечение не совсем в "в реальном времени")

[mainevent100]

Сообщение от Сергей812 можно вывести информацию прямо под нос пользователю?) На том же Net это делается элементарно и тогда в всплывающей подсказке

и без БИМа жить можно ))

[Сергей812]

Offtop:

Сообщение от mainevent100 и без БИМа жить можно ))

ну не совсем. БИМ - готовая автоматизация (со своими косяками и ограничениями) из коробки, а своих программистов CAD в большинстве фирм никогда не было и не будет из-за клинической жадности руководства)

[nickname2019]

Если набор светильников представлены как графический объект (блок), то задача имела бы решение. Простое сохранение выбранных объектов приведет к невозможности контроля того, какие объекты просуммированы - тогда проще суммировать каждый раз "ручками" при изменении данных.

[Сергей812]

Сообщение от nickname2019 Если набор светильников представлены как графический объект (блок), то задача имела бы решение. Простое сохранение выбранных объектов приведет к невозможности контроля того, какие объекты просуммированы - тогда проще суммировать каждый раз "ручками" при изменении данных.

так это и есть оценочное решение

Сообщение от Shadow_elf1979 Например, есть группа светильников, каждый из которых представлен блоком с атрибутом "P" (мощность). Возможно ли сделать так, чтобы выводилась "в реальном времени", т.е. по отношению к выделенным объектам их суммарная "мощность"?

которое нигде не сохраняется дальше - чисто для удобства оператора проектирования.