Question

下面详细说明，如何实现让用户上点取两点交互绘制一条直线

A.执行命令

调用DoCommand(1),开始执行绘图命令

如下图：

B.响应命令事件

增加控件ImplementCommandEvent事件响应，在事件实现交互绘直线代码

如下图：

用户可以在CAD控件视区任意位置绘制直线。

主要用到函数说明：

函数名：_DMxDrawX::DrawLine

绘制一个直线。详细说明如下：

参数	说明
DOUBLE dX1	直线的开始点x坐标
DOUBLE dY1	直线的开始点y坐标
DOUBLE dX2	直线的结束点x坐标
DOUBLE dY2	直线的结束点y坐标

函数名：IMxDrawCustomEntity::Draw

把实体绘制到图上。一般用于动态拖放时，在拖放结束时，绘制到图上。

函数名：_DMxDrawXEvents::DynWorldDraw

动态拖放时的绘制事件。详细说明如下：

参数	说明
DOUBLE dX	当前鼠标位置X坐标
DOUBLE dY	当前鼠标位置Y坐标
IDispatch* pWorldDraw	IMxDrawWorldDraw对象，用于动态绘制
IDispatch* pData	IMxDrawCustomEntity对象，动态绘制数据

函数名：_DMxDrawX::DrawText

绘制一个单行文字。详细说明如下：

参数	说明
DOUBLE dPosX	文字的位置的X坐标
DOUBLE dPosY	文字的位置的Y坐标
BSTR pszText	文字内容字符串
DOUBLE dHeight	文字高度
DOUBLE dRotation	文字的旋转角度
SHORT horizontalMode	文字的水平对齐方式,0=kTextLeft,1=kTextCenter,2=kTextRight
SHORT verticalMode	文字的竖直对齐方式,1=kTextBottom,2=kTextVertMid,3=kTextTop

js中实现代码说明：

添加响应动态事件：

document.getElementById("MxDrawXCtrl").ImpDynWorldDrawFun = DoDynWorldDrawFun;

动态拖放时的绘制事件：

function DoDynWorldDrawFun(x,y, pWorldDraw,pData) {
 
    var mxOcx = document.getElementById("MxDrawXCtrl");
 //自定义实体的GUID标识符
    var sGuid = pData.Guid;
    //设置自定义事件的返回值
    mxOcx.SetEventRet(0);
    var curPt =  mxOcx.NewPoint();
     curPt.x =x;
    curPt.y = y;
      if (sGuid == "TestDynDrawLine")
	  { 
    //与用户交互在图面上提取一个点
    var vBasePt = pData.GetPoint("BasePoint");
  
    var length=vBasePt.DistanceTo(curPt);
    var length1=length.toFixed(2);
  
    //计算中心点位置
    var centerPt = mxOcx.NewPoint();
    {
        centerPt.x = curPt.x + (vBasePt.x - curPt.x) / 2;
        centerPt.y = curPt.y + (vBasePt.y - curPt.y) / 2;
    }
    //计算this点减去pPoint，得到的向量
    var vec = vBasePt.SumVector(curPt);
    //返回向量顺时针转到与X轴的角度.[0,2PI)
    var dAng = vec.Angle();
    //变换视区长度
    var dHeigth = mxOcx.ViewLongToDocCoord(15);
    //绘制一个单行文字
    //参数一为文字的位置的X坐标 ；参数二为文字的位置的Y坐标 ；参数三为文字内容字符串
    //参数四为文字高度；参数五为文字的旋转角度
    //参数六为文字的水平对齐方式,0=kTextLeft,1=kTextCenter,2=kTextRight
    //参数七文字的竖直对齐方式,1=kTextBottom,2=kTextVertMid,3=kTextTop
    pWorldDraw.DrawText(centerPt.x, centerPt.y, "长度：" + length1, dHeigth, dAng * 180.0 / 3.14159265, 1, 1);
    //绘制一个直线
    //参数一直线的开始点x坐标，参数二直线的开始点y坐标，参数三直线的结束点x坐标，参数四直线的结束点y坐标
    pWorldDraw.DrawLine (vBasePt.x, vBasePt.y, curPt.x, curPt.y);
	}
	}

动态绘制直线：

function DrawLine() {
     // 创建一个与用户交互取点的对象。
    var point1 = mxOcx.GetPoint(false,0,0,"\n 点取开始点:");
    if(point1 == null)
    {
        return;
    }
    var getSecondPt = mxOcx.NewComObject("IMxDrawUiPrPoint");
    getSecondPt.message = "第二点";
    getSecondPt.basePoint = point1;
    //不开启皮筋效果
    getSecondPt.setUseBasePt(true);
    //调用
    var spDrawData = getSecondPt.InitUserDraw("TestDynDrawLine");
    // 设置动态绘制参数.
    spDrawData.SetPoint("BasePoint", point1);
    // 开始取第二个点。
    if (getSecondPt.go() != 1)
        return;
    var ret = spDrawData.Draw();      
}

效果展示：

通过点击绘制直线按钮，触发DrawLine()事件，用户可以在CAD控件视区任意位置点取直线的起点，再点取终点画一条直线。如下图所示：

绘制虚线直线

js中实现代码说明：

动态拖放时的绘制事件：

function DynWorldDrawMyLine( pCustomEntity, pWorldDraw, curPt) {
    //与用户交互在图面上提取一个点
    var vBasePt = pCustomEntity.GetPoint("BasePoint");
    //定义虚线数据据,"MyLineType"是线型名，"6,-8"是虚线的一个单位定义，6是实线长，-8是空格长
    mxOcx.AddLinetype("MyLineType", "6,-10");
    //设计当前线型为"MyLineType"
    pWorldDraw.LineType = "MyLineType";
    //绘制一个直线
    //参数一直线的开始点x坐标，参数二直线的开始点y坐标，参数三直线的结束点x坐标，参数四直线的结束点y坐标
    pWorldDraw.DrawLine (vBasePt.x, vBasePt.y, curPt.x, curPt.y);
}

动态绘制虚线直线：

function DrawMyline() {
    // 创建一个与用户交互取点的对象。
    var point1 = mxOcx.GetPoint(false,0,0,"\n 点取开始点:");
    if(point1 == null)
    {
        return;
    }
    var getSecondPt = mxOcx.NewComObject("IMxDrawUiPrPoint");
    getSecondPt.message = "第二点";
    getSecondPt.basePoint = point1;
    //不开启皮筋效果
    getSecondPt.setUseBasePt(false);
    //调用
    var spDrawData = getSecondPt.InitUserDraw("TestDynDrawMyLine");
    // 设置动态绘制参数.
    spDrawData.SetPoint("BasePoint", point1);
    // 开始取第二个点。
    if (getSecondPt.go() != 1)
        return;
    var ret = spDrawData.Draw();

}

效果展示：

通过点击绘制虚线直线按钮，触发DrawMyline()事件，用户可以在CAD控件视区任意位置点取虚线直线的起点，再点取终点画一条虚线直线。如下图所示：

绘制带宽度颜色的直线

js中实现代码说明：

动态拖放时的绘制事件：

function DynWorldDrawWidthline( pCustomEntity, pWorldDraw, curPt) {
    //与用户交互在图面上提取一个点
    var vBasePt = pCustomEntity.GetPoint("BasePoint");
    //设置颜色
    pWorldDraw.Color  = 16711680;
    //设置线宽
    pWorldDraw.LineWidth = 4;
    //绘制一个直线
    //参数一直线的开始点x坐标，参数二直线的开始点y坐标，参数三直线的结束点x坐标，参数四直线的结束点y坐标
    pWorldDraw.DrawLine (vBasePt.x, vBasePt.y, curPt.x, curPt.y);
}

动态绘制带颜色宽度的直线：

//绘制带宽度颜色的直线
function DrawWidthline() {
    // 创建一个与用户交互取点的对象。
    var point1 = mxOcx.GetPoint(false,0,0,"\n 点取开始点:");
    if(point1 == null)
    {
        return;
    }
    var getSecondPt = mxOcx.NewComObject("IMxDrawUiPrPoint");
    getSecondPt.message = "第二点";
    getSecondPt.basePoint = point1;
    //不开启皮筋效果
    getSecondPt.setUseBasePt(false);
    //调用
    var spDrawData = getSecondPt.InitUserDraw("TestDynDrawWidthline");
    // 设置动态绘制参数.
    spDrawData.SetPoint("BasePoint", point1);
    // 开始取第二个点。
    if (getSecondPt.go() != 1)
        return;
    var ret = spDrawData.Draw();
}

效果展示：

通过点击绘制带现宽的直线按钮，触发DrawWidthline()事件，用户可以在CAD控件视区任意位置点取直线的起点，再点取终点画一条带宽度颜色的直线。如下图所示：