如何绘制一个角度标注?
VB开发|黄洪辉|2018-06-11 11:18
-
回答:
主要用到函数说明:
_DMxDrawX::DrawDimAngular
绘制一个角度标注。详细说明如下:
参数 说明 DOUBLE dAngleVertexX
角度标注的顶点的X值
DOUBLE dAngleVertexY
角度标注的顶点的Y值
DOUBLE dFirstEndPointX
角度标注第一个参考线上的点X值
DOUBLE dFirstEndPointY
角度标注第一个参考线上的点Y值
DOUBLE dSecondEndPointX
角度标注第二个参考线上的点X值
DOUBLE dSecondEndPointY
角度标注第二个参考线上的点Y值
DOUBLE dTextPointX
文字位置点X值
DOUBLE dTextPointY
文字位置点Y值
VB中实现代码说明:
Private Sub DrawDimAngular_Click() MxDrawX1.AddDimStyle "MyDimStyle2", "41,0.18,141,0.09,40,200", "77,1,271,3", "", "" MxDrawX1.DimStyle = "MyDimStyle2" '把颜色改回黑白色 MxDrawX1.DrawColor = 0 '把线型改成实线 MxDrawX1.LineType = "" '设置线宽 4 MxDrawX1.LineWidth = 0 MxDrawX1.DrawDimAngular 500, 5000, 0, 5500, 1000, 5500, 500, 5500 '把所有的实体都放到当前显示视区 MxDrawX1.ZoomAll '更新视区显示 MxDrawX1.UpdateDisplay End Sub