[МишаИнженер]

Помогите в атрибуты блока автоматически вставить координаты X и Y начальной точки выноски? Выноска создаётся с блоком в котором есть атрибуты: КоординатаX и КоординатаY

[Сергей Богатов]

Есть вариант с ДБлоком в виде выноски. Координаты точки вставки = поля в атрибутах. мне кажется в "даунлоде" есть такое

[МишаИнженер]

Поконткретнее можно дать ссылку? На какое слово мне искать в даунлоаде?
Пока придумал вот это (посмотри прикреплённый архив) вроде всё работает, только выноску создаёт старомодную. Может кто придумает получше код?
Присоедините модуль VBA "КоординатыТочки" и запустите макрос: ПодписатьКоординатыТочки

[Сергей Богатов]

Сообщение от МишаИнженер Поконткретнее можно дать ссылку? На какое слово мне искать в даунлоаде?

http://dwg.ru/dnl/3401

P.S.
Это не самый лучшая выноска. Где-то были и лучше, но принцип схож.
Берёшь этот блок и в атрибутах(там где default) выставляй поля BlockPlaceholder->Position(X и Y)

[МишаИнженер]

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

^C^C-VBARUN ПодписатьКоординатыТочки

Не забудьте пробел в конце команды

[Сергей Богатов]

Сообщение от МишаИнженер Сергей в тех файлах на которые Вы дали сылку координаты точки не указываются автоматически, а моя программа указывает эти координаты автоматически

меняются то они неавтоматически...
а как сделать чтоб координаты автоматически менялись при изменении положения выноски я добавил в посте №4

[Vombat]

реализация при помощи динамического блока и ПОЛЕЙ

[МишаИнженер]

Интересно Vombat!
Объясните поподробнее пожалуйста как это получилось!
На каком шаге надо открывать диалоговое окно настройки полей? И какие поля настраивать? Вроде свойство "Значение" у обоих атрибутов одинаковое: "InsertionPoint", однако берутся в итоге разные значения. Как это получается если название поля-свойства одинаковое в списке свойств?

[asys]

Вроде свойство "Значение" у обоих атрибутов одинаковое: "InsertionPoint", однако берутся в итоге разные значения.

смотри внимательно в настройках поля. У точки вставки 3 координаты, справа внизу окна можно указать какие из координат будут отображаться

[Vombat]

Сообщение от МишаИнженер Объясните поподробнее пожалуйста как это получилось!

вот так

[МишаИнженер]

Просто здорово Vombat!
Спасибо тебе большое! Такого видео я не ожидал увидеть и моему воосторгу нет предела!
<...> Оффтоп. Спрашивай в ЛС /kpblc/

[Angel_and]

спасибо. "королева , в восхищении" (ц)

[GazRust]

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

[Кулик Алексей aka kpblc]

dwg предоставь.

[GazRust]

Сообщение от Кулик Алексей aka kpblc dwg предоставь.

Вот файл, вверху моя попытка сделать выноску, внизу то как должно выглядеть. Сильно не смейтесь

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

[Deniska_che]

Мне кажется, в один атрибут проще затолкать координаты. Только я поменял XY местами, чтобы соответствовало геодезии
А верхняя строка - артибут без полей

[GazRust]

Сообщение от Deniska_che Мне кажется, в один атрибут проще затолкать координаты. Только я поменял XY местами, чтобы соответствовало геодезии А верхняя строка - артибут без полей

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

Вот код лиспа

Код:

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

 (defun c:ordi(/ fPt oldEcho *error*)

  (defun *error*(msg)
      (setvar "CMDECHO" oldEcho)
    (princ)
    ); end of *error*
  
  (setq oldEcho(getvar "CMDECHO"))
  (setvar "CMDECHO" 0)
  (if
    (setq fPt(getpoint "\nSpecify point >> "))
    (progn
      (command "_.dimordinate" fPt "_t"
	       (strcat
		 "X=" (rtos(car fPt)2(getvar "DIMDEC")) ", " "Y=" (rtos(cadr fPt)2(getvar "DIMDEC"))
		 ); end strcat
	       pause
	       ); end command
      (setvar "CMDECHO" oldEcho)
      ); end progn
    ); end if
  (princ)
  ); end of c:ordi

Прописываю в лиспе _mleader вместо _.dimordinate, но получаю просто пустую выноску. Может есть у кого идеи чтобы получилась выноска с координатами, вместо ординатного размера?

[Deniska_che]

если добавить растягивание полок, то их можно подогнать как удобно/красиво

Да и вроде тема про атрибуты, а не лисп ))

[pan]

А такую выноску с полями с пересчетом в строительные координаты никто не делал?

[art_rrc]

Offtop:

Сообщение от pan А такую выноску с полями с пересчетом в строительные координаты никто не делал?

Правильно сформулированный вопрос содержит 90% ответа

[pan]

Ну ладно.
А как можно получить поле с координатами в пользовательской системе координат?

[Сергей812]

в стандартных полях нет, в том же лиспе есть функция trans

[art_rrc]

Сообщение от pan Ну ладно. А как можно получить поле с координатами в пользовательской системе координат?

См. пример с парой вариантов, можно применить идеи и использовать для своих нужд.

[pan]

Видимо, действительно, остается два варианта:
1. Делать два блока. Один - начало координат, второй - выноска с полем, которое будет вычислять разницу между первым блоком и своей точкой вставки (по примеру отметки уровня).
2. Делать лисп, который будет вставлять блок выноски и запихивать в ее атрибуты поле с формулой, вычисляющей координаты в текущей ПСК.

Непонятно пока, что делать, если ПСК повернута относительно МСК.

[Сергей Богатов]

Сообщение от pan А такую выноску с полями с пересчетом в строительные координаты никто не делал?

Делал, но давно... Под рукой нет, но по-памяти:
1)Запускаешь Autocad MEP
2) В нём делаешь блок-марку с атрибутами полями с помощью встроенного VBscript
3) используешь в классическом Автокаде этот блок

Понятное дело, что были ограничения:
1) используется МСК и начало сетки должно быть именно в 0,0 МСК
2) При очень большом кол-ве были тормоза
3) Этот блок-марка был прокси для классического автокада - соответственно управление слоями, цветом, и т.п. ограничены. Может быть с "энаблером" и лучше будет