CAD绘制PL线(网页版)

网友投稿 249 2022-09-20

CAD绘制PL线(网页版)

js代码实现如下:

function DrawPolyline(){ var mxOcx = document.all.item("MxDrawXCtrl"); mxOcx.focus(); var point1 = mxOcx.GetPoint(false,0,0,"\n 点取开始点:"); if(point1 == null) { return; } //mxOcx.PathMoveToEx(point1.x,point1.y,10,10,0.0); mxOcx.PathMoveTo(point1.x,point1.y); var point2 = mxOcx.GetPoint(true,point1.x,point1.y,"\n 点取下一个:"); if(point2 == null) { return; } var tmpobj = new Array(); //mxOcx.PathLineToEx(point2.x,point2.y,10,10,0.0); mxOcx.PathLineTo(point2.x,point2.y); var iCount = 0; var id = mxOcx.DrawLine(point1.x,point1.y,point2.x,point2.y); tmpobj[iCount] = id; iCount = iCount + 1; point1 = point2; while(true) { var point2 = mxOcx.GetPoint(true,point1.x,point1.y,"\n 点取下一个:"); if(point2 == null) { break; } mxOcx.PathLineTo(point2.x,point2.y); var id = mxOcx.DrawLine(point1.x,point1.y,point2.x,point2.y); tmpobj[iCount] = id; iCount = iCount + 1; point1 = point2; } var i = 0; for(;i < iCount;i++) { mxOcx.Erase(tmpobj[i] ); } var lId = mxOcx.DrawPathToPolyline(); // 把新绘的pl线变成双线。 var param = mxOcx.Call("Mx_NewResbuf",""); param.AddLong(lId); // 双线的宽度。 var lineWidth = 2; param.AddDouble(lineWidth); // 调用变双线函数。 var ret = mxOcx.CallEx("ExApp_MakeDoubleLine",param); if(ret.AtString(0) == "Ok") { // 返回的绘制的双线对象id. alert(ret.AtLong(1)); } // 删除旧的pl线。 mxOcx.Erase(lId); }

版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。

上一篇:做不好公域流量也就没有私域流量,别再简单把微信群当私域流量了!
下一篇:CAD参数绘制椭圆
相关文章

 发表评论

暂时没有评论,来抢沙发吧~