[求助]怎样使标注离被标注对象远些?
标注离被标注的对象太近了 以至标注界限(也就是标注中的那两条竖线)都没被显示出来怎样使标注离被标注的对象远些?
请告诉具体点的编程办法
谢谢!
一般来说,建立标注要设置下面的属性!(模仿天正建筑的标注方法)
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 楼上的真强
那怎么看天正的代码?
另外可以告诉你的QQ不?
页:
[1]