[Vladimir_Sergeevich]

Проблема избита, да не до конца...
Есть аннотатиыный блок (точнее куча), которые тягаются с палитр. В один прекрасный момент у НЕКОТОРЫХ блоков пропала заливка... fillmode 1, _plan и _view тоже номально стоят.
Катринка и чертеж прилагаются.

з.ы. рисовал не я, такой баг вижу впервые... По большому счету я вообще теряюсь. Копая именно эти два, увидел странность: блоки в свойствах выглядят одинаково (имя, атрибуты, масштабы). догадался задать им одинаовый поворот - а они смотрят в разную сторону. как так могло получиться?

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

Вхождения блоков имеют разную нормаль (в разных ПСК они вставлены). Это очень хорошо видно на виде сбоку.

[Alexeipost]

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

[KronSerg]

Сплющил их всё.

[Vladimir_Sergeevich]

Сообщение от Кулик Алексей aka kpblc в разных ПСК они вставлены

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

Сообщение от KronSerg Сплющил их всё.

Ни разу не решение проблеммы - блоки нужны блоками и с живыми атрибутами

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

Сообщение от Vladimir_Sergeevich То есть талантливый товарищ умудрился задать пск с углом к оси z?

Ага. У меня сейчас нет возможности писать нормально и гарантированно работающую программу, но в качестве первого варианта:

Код:

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

 (defun tt (/ ent lst adoc)
  (if (and (= (type (setq ent (vl-catch-all-apply
                                (function
                                  (lambda ()
                                    (vlax-ename->vla-object (car (entsel "\nSelect block <Cancel> : ")))
                                    ) ;_ end of lambda
                                  ) ;_ end of function
                                ) ;_ end of vl-catch-all-apply
                          ) ;_ end of setq
                    ) ;_ end of type
              'vla-object
              ) ;_ end of =
           (= (vla-get-objectname ent) "AcDbBlockReference")
           ) ;_ end of and
    (progn
      (vla-startundomark (setq adoc (vla-get-activedocument (vlax-get-acad-object))))
      (setq lst (mapcar (function (lambda (x) (cons x (vlax-get-property ent x)))) '("InsertionPoint")))
      (vla-put-normal ent (vlax-3d-point '(0. 0. 1.)))
      (foreach prop lst
        (vlax-put-property ent (car prop) (cdr prop))
        ) ;_ end of foreach
      (command "_.attsync"
               "_name"
               (if (vlax-property-available-p ent 'effectivename)
                 (vla-get-effectivename ent)
                 (vla-get-name ent)
                 ) ;_ end of if
               ) ;_ end of command
      (vla-endundomark adoc)
      ) ;_ end of progn
    ) ;_ end of if
  (princ)
  ) ;_ end of defun

[Vladimir_Sergeevich]

Не знаю стоит ли изгаляться, но все равно спасибо... Боец уже все преределал ручками, в качестве мер профилактики объяснил ему, зачем нужен osnapz 1.
Не факт, что будет рецидив.

[Vladimir_Sergeevich]

э... кхм... вопрос не в тему, но тому же файлу...
Некто что то наколдовал, в итоге высота текстов не меняется
при вводе спрашивает высоту (в настройках стиля 0) - ставлю 2.5 - отрисовывает 3.0. через свойства также не менятся, остается 3.0. меня порвало... это как так сделали?

[Хмурый]

Vladimir_Sergeevich, LUPREC сколько?

[Vladimir_Sergeevich]

ух ты как... спасибо, не знал такого еще. был 0