[求助]怎样使标注离被标注对象远些?

xiaokk · 发表于 2005-2-19 20:01:00

标注离被标注的对象太近了以至标注界限(也就是标注中的那两条竖线)都没被显示出来
怎样使标注离被标注的对象远些?
请告诉具体点的编程办法
谢谢!

laoliu09 · 发表于 2005-2-19 20:22:00

一般来说，建立标注要设置下面的属性！（模仿天正建筑的标注方法）
   Set objdim = ThisDrawing.ModelSpace.AddDimAligned(p1, p2, p3)
   objdim.Color = acGreen
   objdim.ExtensionLineExtend = 250
   objdim.ExtensionLineOffset = 300
   objdim.Arrowhead1Block = "mydim"
   objdim.Arrowhead2Block = "mydim"
   objdim.ArrowheadSize = 1
   objdim.TextStyle = "dim_font"
   objdim.TextColor = acWhite
   objdim.TextGap = 150
   objdim.TextInside = True
   objdim.TextOutsideAlign = False
   objdim.TextInsideAlign = False
   objdim.VerticalTextPosition = acAbove
   objdim.PrimaryUnitsPrecision = acDimPrecisionZero

xiaokk · 发表于 2005-2-20 17:01:00

楼上的真强
那怎么看天正的代码？
另外可以告诉你的QQ不？

[求助]怎样使标注离被标注对象远些?

发表回复

精选推荐