[Ax3]

Привет, братья по каду!
Обнаружил следующие странные вещи (иллюстрация во вложенном чертеже; прямоугольники смещены, но это не важно):
Проверка GetBoundingBox и textbox_exmpl_v1.00+(c)Danilov_AS_2010.10.07.dwg
1. GetBoundingBox либо вообще не обрабатывает многострочные атрибуты (кад выдет ошибку "Automation Error. Null extents"), либо возвращает координаты так, словно это однострочный текст. [в приложенном чертеже красным]
2.

Код:

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

(textbox (entget <атрибут>))

работает аналогично, хотя и возвращает чуть-чуть другие координаты, но достаточно близкие к тем, что возвращает GetBoundingBox. Плюс он спокойно относится ко ВСЕМ атрибутам, ни разу не возвращал ошибки. [в приложенном чертеже зеленым].
{добавлено 2010.10.08 15:53} Хм, вообще-то похоже, что textbox атрибута возвращает В ТОЧНОСТИ такой же прямоугольник, что и getboundingbox, правда, немного смещенный.
3. Конструкция типа

Код:

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

(textbox '((0 . "MTEXT") (100 . "AcDbMText") (1 . "<текст, вытащенный из атрибута>") (40 . <высота текста>) (7 . <стиль текста>)))

вообще выдает какое-то непонятное exception, видимо, не хватает каких-то dxf-данных.
4. Конструкция типа

Код:

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

(textbox '((1 . "<текст, вытащенный из атрибута, с заменой всех \\P на \n>") (40 . <высота текста>) (7 . <стиль текста>)))

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

Для анализа использовал вот эти чертеж и программу:
Проверка GetBoundingBox и textbox_v1.00+(c)Danilov_AS_2010.10.07.dwg
GetBoundingBox_test(c)Danilov_AS_aka_`Hawk`_2010.10.07.lsp

Собственно вопрос - это глюк, недоработка или я чего-то не догоняю? И как выкрутиться, если надо получить все-таки прямоугольник, описывающий многострочный атрибут? Кто-нибудь сталкивался с такой проблемой?

P.S. В принципе я вроде выкрутился - создаю рядом mtext, содержащий текст из атрибута, и получаю его BoundingBox, потом mtext удаляю. Но это как-то... гм, неправильно, что ли...

P.P.S. AutoCAD 2008 en SP1.

[Supermax]

Я сталкивался.

[Ax3]

>>Supermax
И как решал, если не секрет?

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

textbox некорректно обрабатывает многострочные тексты (и, по правде говоря, вообще не должен их обрабатывать).
Советую посмотреть http://www.caduser.ru/forum/index.ph...#message129846

[Ax3]

>>Кулик Алексей aka kpblc
Привет, Алексей.
Спасибо за ссылку. Но, боюсь, это не то. Ключевым моментом в этой программе является

Код:

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

(vlax-invoke-method vlao 'copy)

, который к атрибутам вообще не применим, как следует из справки

Signature RetVal = object.Copy ... Remarks AttributeReference: You should not attempt to use this method on AttributeReference objects. AttributeReference objects inherit this method because they are one of the drawing objects, however, it is not feasible to perform this operation on an attribute reference.

К сожалению...
Прошу меня поправить, если где-то ошибся. И спасибо за участие. :-)

textbox некорректно обрабатывает многострочные тексты (и, по правде говоря, вообще не должен их обрабатывать).

(Ой) Да, я теперь понял, в чем фишка textbox-а. Он вообще не обрабатывает такой объект, как "MTEXT" (у меня возвращает nil) {отредактировано 2010.10.08 12:18}. Странно, что он при этом абсолютно спокойно относится к многострочным атрибутам, хоть и обрабатывает их неправильно {отредактировано 2010.10.08 12:25}.

[VVA]

Ax3, Про свой же топик забыл?
Автоматический подбор высоты текста

[Ax3]

>>VVA
И правда забыл :-)

Однако acet-geom-txtbox отрабатывает вот так:

GetBoundingBox_test_v1.01(c)Danilov_AS_aka_`Hawk`_2010.10.08.lsp
То есть тоже неправильно

acet-geom-object-point-list для атрибутов вообще nil возвращает

{Добавлено _2010.11.09_17.52.25}
В общем, пока создание и измерение mtext-а с таким же содержимым, как у многострочного атрибута, остается единственным приемлемым вариантом...