Доброго времени суток, уважаемые форумчане! Помогите пожалуйста с вопросом, указанным в теме. У меня есть отверстие, сделанное с помощью выдавливания, из этого отверстия сделан прямоугольный массив. Мне требуется поставить диаметр, допустим, 3-го члена массива. Не могу понять, как мне это сделать. Буду признателен любому совету.
П.С. На текущий момент есть вот что (привожу лишь конец кода, дабы не разводить писанину):
' ссылка на массив
Dim oRPFeature As RectangularPatternFeature
Set oRPFeature = oRPFeatures.Item("M1")
Dim oFPElements As FeaturePatternElements
Set oFPElements = oRPFeature.PatternElements
Dim oFPElement As FeaturePatternElement
Set oFPElement = oFPElements(3)
Dim oProxy As FeaturePatternElementProxy
oOcc.CreateGeometryProxy oFPElement, oProxy
Dim oCurves As DrawingCurvesEnumerator
Set oCurves = oView.DrawingCurves(oProxy)
В последней строке выдает ошибку. Не могу понять почему. Если сделать аналогичную строчку, и поставить ссылку прокси непосредственно на выдавливание, с которого делаю массив, то все работает.
