当前位置:知识库 / VB开发 / 详情
如何绘制一个线型标注?
如何绘制一个线型标注?
VB开发|黄洪辉|2018-06-11 11:26
回答:

主要用到函数说明:


_DMxDrawX::DrawDimRotated


绘制一个线型标注。详细说明如下:


参数说明

DOUBLE dExtLine1PointX

输入第一条界线的起始点X值

DOUBLE dExtLine1PointY

输入第一条界线的起始点Y值

DOUBLE dExtLine2PointX

输入第二条界线的起始点X值

DOUBLE dExtLine2PointY

输入第二条界线的起始点Y值

DOUBLE dDimLineLocationX

输入标注线自身上的点X值

DOUBLE dDimLineLocationY

输入标注线自身上的点Y值

DOUBLE dRotationAngle

输入标注的旋转角


VB中实现代码说明:


    Private Sub DrawDimRotated_Click()
    MxDrawX1.AddDimStyle "MyDimStyle4", "41,0.18,141,0.09,40,200", "77,1,271,3", "", ""
    MxDrawX1.DimStyle = "MyDimStyle4"

    '把颜色改回黑白色
    MxDrawX1.DrawColor = 0

    '把线型改成实线
    MxDrawX1.LineType = ""

    '设置线宽 4
    MxDrawX1.LineWidth = 0


    MxDrawX1.DrawDimRotated 0, 7000, 500, 7000, 250, 7050, 0

    MxDrawX1.DrawDimRotated 0, 7200, 0, 7400, 150, 7300, 0.771

    '把所有的实体都放到当前显示视区
    MxDrawX1.ZoomAll

    '更新视区显示
    MxDrawX1.UpdateDisplay
    End Sub
相关问题
如何绘制一个半径标注?
如何绘制一个直径标注?
如何绘制一个角度标注?
如何绘制一个对齐标注?
如何得到多行文本?
如何得到0层上的所有实体?
如何把自定义实体,变成普通实体?
如何与用户交互在图面上选择一个实体?
如何绘制一个单行文字?
如何把控件图形变成二进制流输出?
梦想CAD是专业的CAD插件(控件),可轻松在网页、手机及BS/CS程序中浏览编辑DWG文件,不需安装AutoCAD即可运行。经十余年累积已非常稳定可靠,有关键的空间搜索算法,并使用汇编优化,可同时处理50万级实体,有非常高的图形显示和处理效率。
联系我们
TEL:400-888-5703
185-8173-1060
客服I QQ: 3570505660
技术I QQ: 827867134
技术II QQ:6884123
VIP服务购买
销售TEL:156-8136-8971
销售QQ:710714273
用户交流
控件QQ交流群1:73281982
控件QQ交流群2:112199959
MxCAD软件群 1:515771658
技术I:QQ
827867134
客服I:QQ
3570505660
销售QQ
710714273
联系电话400-888-5703