Особенности vla-функций и их применения, часть 3

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

В части 2 был показан вариант внесения изменений в свойство Normal (группа 210) примитива. А что будет, если заменить свойство слоя (Layer; DXF-группа 8)? Особенно для несуществующего слоя?
Если подобное выполнять через entmod, то слой будет создан. Обычно создается слой по аналогии с текущими настройками слоя “0″, но, говорят, “бывают варианты”. А вот vla-операции подобных вольностей не позволяют, и придется сначала слой создать, и только потом его назначать:

Выполним код в пустом файле и проверим: действительно, отрезок создан, и получил слой Layer_Ent. А теперь попробуем аналогичное сделать для vla-функций:

Попытка выполнить такой код выдаст ошибку:

Поэтому код надо переделывать. Перед тем, как вносить изменения, попробуем немного “потеоритизировать”. Как было сказано, “Суха, мой друг, теория всегда”. Поэтому будем теоретизировать и ставить эксперименты одновременно. Поскольку споткнулись мы на ActiveX-обработке, с ней и будем воевать.
Создадим слой с именем “1″:

Как известно, каждый элемент файла dwg имеет уникальную метку (handle, или “хендл”). Посмотрим хендл только что созданного слоя:

Это нам понадобится немного позже.
А вот что будет, если повторно выполнить “создание” слоя? То есть

Ух ты, а слой-то повторно создан, что ли? Да нет, не создан он. Просто получен новый указатель на него. Это будет видно, если мы уже для layer1 попробуем получить хендл:

Казалось бы, все становится просто и понятно: надо или нет, все равно создаем новые слои, т.к. для случая их отсутствия слой будет создан; а для случая их существования – получен указатель на него.
Но лично я не рекомендовал бы такое делать. Честно говоря, такой код мне не кажется красивым. Для подобных вариантов я предпочитаю делать по-другому: попытаться получить сначала указатель на существующий слой, и, если его нет, то слой создавать.
Вариантов получения указателя на слой для vla-варианта несколько:

Достаточно простое и очевидное решение, но в некоторых случаях неприемлемое. Проблема возникает там, где ее совсем не ждешь.
Представим себе, что в vl-catch-* “обернуто” выполнение некоей функции, которая сама вызывает vl-catch-*, а та уже, в свою очередь – вызывает lispru-get-or-create-layer-by-error-catch. То есть vl-catch-* вложены друг в друга.
В некоторых версиях AutoCAD и/или вертикальных приложениях уровень подобных вложений не может превышать 4-5. Не знаю, с чем это связано, но столкнуться с этим в условиях полноценной эксплуатации кода весьма неприятно. Возможно, сейчас эта проблема уже решена, не тестировал. Мне оказалось проще выполнять немного другой код:

Памятуя о времени выполнения, проведем тестирование:

Как видим, в “пляжных” условиях (файл пустой, функция тестируется без вложенности и т.п.) выполнение через error-catch намного быстрее (по крайней мере у меня на компьютере). Но, вспоминая об ошибке вложений, я бы не рисковал. Если хотите – проведите несколько опытов. Может, Вам повезет больше чем мне.