Тема: отображение примитива после создания его объекта в VBA

Пожалуйста, помогите разобраться.
Есть проблема. Причина для меня не понятна.
Суть в следующем. Для примера.
В VBA макросе в цикле создаются окружности. В первом случае с помощью создания объекта
Set myCircle = hisDrawing.ModelSpace.AddCircle(centr, i);
во втором случае с помощью команды LISP
ThisDrawing.SendCommand "_Circle" & vbCr & "2,2,0" & vbCr & "100" & vbCr.
При запуске макроса наблюдаем построение в постранстве модели.
   В первом случае - когда примитив создается через объект, рисунок, т.е. все окружности на пространстве модели появляется только после завершения работы программы макроса;
   во втором случае - видно как рисуется каждая окружность.
   Видимая зона пространства модели соответствует размерам рисунка.
   Мне необходимо, чтобы примитив рисовался на пространстве модели сразу после создания его объекта, не дожидаясь окончания программы VBA.

Re: отображение примитива после создания его объекта в VBA

Попробуй Regen текущего вида (или всех видов) сразу после AddCircle.

Re: отображение примитива после создания его объекта в VBA

> Михаил
Или примени метод object.Update к созданному объекту.. Чтобы не перерисовывать весь экран.

Re: отображение примитива после создания его объекта в VBA

> Сидор Лютый
Вопрос не в тему, но тем не менее: а если рисование выполнять в блок, тогда тоже будет достаточно update на новый примитив сделать? Или над будет еще и вставку (или описание?) блока обновлять? Это так, для общего развития.

Re: отображение примитива после создания его объекта в VBA

> kpblc
Я - пас.. Никогда еще программно не рисовал блок.. Могу говорить только убедившись..
Как-нибудь попробую, доложусь))

Re: отображение примитива после создания его объекта в VBA

> Михаил
Можно и так. После каждой окружности

ActiveDocument.Regen acAllViewports

Re: отображение примитива после создания его объекта в VBA

Сидор Лютый, спасибо за подсказку.
Метод Update работает - объект появлется на пространстве модели сразу после выполнения этого метода.
И все же, почему не появляется примитив после создания объекта не понятно.
Применять регенерацию к рисунку не целесообразно в силу значительных затрат времени на эту операцию.

Re: отображение примитива после создания его объекта в VBA

Михаил пишет:

И все же, почему не появляется примитив после создания объекта не понятно

А что, время между операциями:

set Obj = ThisDrawing.ModelSpace.AddCircle()
obj.Update

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