如何取得某图层的默认线型？

zcmfk · 发表于 2010-11-9 10:35:00

各位学长，我又碰到新问题了。在岗位工作中，我需要根据图纸的某图层名来取得该图层的默认线型：
   Dim acLyrTblRec As LayerTableRecord
   If acLyrTbl.Has(acEnt.Layer) = True Then  _
      acLyrTblRec = acTrans.GetObject(acLyrTbl(acEnt.Layer), OpenMode.ForWrite)

但我只能取得  acLyrTblRec.LinetypeObjectId,却无法转化为线型名称，请各位帮忙！谢谢！

雪山飞狐_lzh · 发表于 2010-11-9 11:21:00

dim lttr as LinetypeTableRecord = acTrans.GetObject(acLyrTblRec.LinetypeObjectId, OpenMode.ForWrite)

lttr.name

chpmould · 发表于 2010-11-9 12:21:00

我也学习一下

zcmfk · 发表于 2010-11-9 13:02:00

谢谢了。

如何取得某图层的默认线型？

发表回复

精选推荐

浏览过的版块