[AlexV]

Собственно, вот оно код, вставляющий нужный мне файл внешней ссылкой, "биндящий" его, и после удаляющий блок и описание блока..

Код:

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

...
Dim I_Point(0 To 2) As Double
  I_Point(0) = 0: I_Point(1) = 1: I_Point(2) = 0
  Dim Block_P As AcadExternalReference
  If ThisDrawing.FullName <> path Then
    Set Block_P = ThisDrawing.ModelSpace.AttachExternalReference(path, "ёклмн", I_Point, 1, 1, 1, 0, False)
    ThisDrawing.Blocks.Item(Block_P.Name).Bind True
    Block_P.Delete
    ThisDrawing.Blocks.Item("ёклмн").Delete
End If

Не берусь судить, насколько правильно написан, но в 2008 работает нормально, в 2012 тормозит на строке Block_P.Delete, ругаясь вот такими окнами:


Может, кто знает, где собака зарылась?

[hwd]

Сообщение от Кулик Алексей aka kpblc AlexVА если сделать сначала Bind, потом объекту Explode, и только потом уже Erase на вхождение блока и Delete на описание?

гы. если ты его уже взорвал, то какое может быть вхождение?

[Vildar]

Может это какой-то частный случай?
На другом примере попробуй проделать то же самое.
Попробовал простой пример, по типу с 1 поста, все нормально работает. Автокад 2013 правда.

[hwd]

2 топикстартер
Подозреваю, что под "базой данных" подразумевается объект Database. Проверь у Block_P значение свойств ObjectId.IsValid, а так же проверь у него значение свойства ObjectId.Database.

Пробовал, эксплодить тоже не дает.. "неприменимо", понимаешь..

а "эксплодить" внешнюю ссылку в принципе невозможно. "Эксплодить" можно результат биндинга - вхождения блоков.

Видно, много чего поменялось в объектной модели автокада 2012..

я всё же склоняюсь к версии, что проблема в том, откуда растут руки как нацарапан код.

[AlexV]

Сообщение от hwd гы. если ты его уже взорвал, то какое может быть вхождение?

Ну да.. я пробовал, -

Код:

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

...
Dim explodedObjects As Variant
explodedObjects = Block_P.Explode
...

вхождение не стирать, а взорвать (тем более, в нем по факту нету ни одного примитива),- но не дается, зараза... ни взрываться, ни перемещаться, ни копироваться не желает. Хотя командами автокада все это - без проблем.

"а "эксплодить" внешнюю ссылку в принципе невозможно. "Эксплодить" можно результат биндинга - вхождения блоков... я всё же склоняюсь к версии, что проблема в том, откуда растут руки как нацарапан код."

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

свойств ObjectId.IsValid и ObjectId.Database я у Block_P не обнаружил...

P.S. Проблема криво, но решилась...

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

Сообщение от hwd гы. если ты его уже взорвал, то какое может быть вхождение?

Применение метода Explode к вхождению блока не удаляет само вхождение.

[hwd]

Сообщение от Кулик Алексей aka kpblc Применение метода Explode к вхождению блока не удаляет само вхождение.

Полез в справку, попробовал на практике: да, так и есть. Честно говоря, я был уверен, что метод Explode будет работать аналогично команде _EXPLODE, а оно в .NET работает иначе, как оказалось... Спасибо за инфу, буду знать теперь Там два метода представляют собой интерес: ExplodeToOwnerSpace и Explode.

[Дима_]

Сообщение от hwd Полез в справку, попробовал на практике: да, так и есть. Честно говоря, я был уверен, что метод Explode будет работать аналогично команде _EXPLODE

Offtop: Я тоже как-то на этом попался

[Do$]

А зачем через внешнюю ссылку, если файл библиотеки можно вставить как блок? То есть использовать не AttachExternalReference+Bind а InsertBlock. После вставки удаляем этот блок, удаляем его описание, а описания всех вложенных блоков останутся в чертеже.

[hwd]

Сообщение от Do$ А зачем через внешнюю ссылку, если файл библиотеки можно вставить как блок?

А зачем через внешнюю ссылку, когда вообще можно сделать банальный импорт нужных определений блоков? Ответ автор указал выше: потому что по др. он не умеет, а иные способы осваивать не хочет.
Но он там выше где-то отметил, что проблема у него уже отвалилась.

[AlexV]

Сообщение от Do$ А зачем через внешнюю ссылку, если файл библиотеки можно вставить как блок? То есть использовать не AttachExternalReference+Bind а InsertBlock. После вставки удаляем этот блок, удаляем его описание, а описания всех вложенных блоков останутся в чертеже.

Do$, и правда.. однако, блин,- стереотипы мышления! Элементарная вроде мысля, а в голову не пришла..

Сообщение от hwd А зачем через внешнюю ссылку, когда вообще можно сделать банальный импорт нужных определений блоков? Ответ автор указал выше: потому что по др. он не умеет, а иные способы осваивать не хочет.

Ну почему же не хочу, хочу.. Если их преимущество очевидно, а затраты времени на изучение невелики. Вот Do$ подсказал способ - на доступном мне уровне, - я сразу побежал AttachExternalReference на InsertBlock править.. (у меня проблема отвалилась, но гораздо более дурным способом..)