Тема: Обработчик событий.
Есть обработчик событий на модификацию полилинии:
Option Explicit Public WithEvents polyObj As Acad3DPolyline ..... Sub Poly() ..... Set polyObj = ThisDrawing.ModelSpace.Add3DPoly(vertex) 'vertex - список вершин. ..... End Sub ..... Private Sub polyObj_Modified(ByVal pObject As AutoCAD.IAcadObject) MsgBox "Poliline has been modified" End Sub
Но если, например, создать несколько полилиний, то обработчик взаимодействует только с последней полилинией. Что сделать, чтобы обрабатывались и ранее созданные полилинии?