• peshkoff
  • Восстановленный участник
  • На форуме с 20 марта 2008г.
  • Сообщений: 26
  • Спасибо: 0

Тема: Определение типа размера

Здравствуйте.
Как определить тип размера радиальныйй, диаметральный или линейный?

  • LeonidSN
  • Активный участник
  • На форуме с 30 мая 2005г.
  • Сообщений: 1,480
  • Спасибо: 5

Re: Определение типа размера

Sub DimType()
    Dim returnDim As AcadDimension
    Dim basePnt As Variant
    On Error Resume Next
    ThisDrawing.Utility.GetEntity returnDim, basePnt, "Select an dimension, please!"
    MsgBox returnDim.ObjectName
End Sub

  • peshkoff
  • Восстановленный участник
  • На форуме с 20 марта 2008г.
  • Сообщений: 26
  • Спасибо: 0

Re: Определение типа размера

Я за день ковыряния тоже до ObjectName добрался :) Значит правильный способ. Спасибо!