29个曲线工具集成非模式面板

Lispboy

1. (defun c:xdtb_menu_curveedit ()
   
2.   (XD::ODCL:MENU
   
3.     1
   
4.     '(" 曲线线工具集 " 240 360 3 70 24 8 20000)
   
5.     '(
   
6.       ("button" "消除重线" "_xdtb_curveremovedup")
   
7.       ("button" "曲线布尔" "_curve_boole")
   
8.       ("button" "曲线要素" "_xdtb_curveys")
   
9.       ("button" "曲线方向" "_XDTB_CurveDirec")
   
10.       ("button" "局部曲线" "_XDTB_CurveSub")
    
11.       ("button" "定距伸缩" "_XDTB_CurveDJYS")
    
12.       ("button" "加粗曲线" "_plw_match")
    
13.       ("button" "局部加粗" "_XDTB_CurveSubJc")
    
14.       ("button" "多重偏移" "XDTB_CurveOffset")
    
15.       ("button" "局部偏移" "_XDTB_CurveSubOffset")
    
16.       ("button" "三线切弧" "_XDTB_Crv3TArc")
    
17.       ("button" "圆公切线" "_XDTB_Cir2Tan")
    
18.       ("button" "曲线断开" "_XDTB_mbrk")
    
19.       ("button" "交点断开" "_curve_intbrk")
    
20.       ("button" "封闭曲线" "_curve_setclosed")
    
21.       ("splitter" "" "")
    
22.       ("button" "3D转2D线" "_XDTB_3DPL2LW")
    
23.       ("button" "曲线转向" "_XDTB_reverse")
    
24.       ("button" "曲线转换" "_XDTB_CurveConvert")
    
25.       ("button" "曲线变折" "_XDTB_CIR2JX")
    
26.       ("button" "折线转弧" "_XDTB_JX2ARC")
    
27.       ("button" "转 SPL圆" "_XDTB_SPL2CIR")
    
28.       ("button" "POLY互转" "_XDTB_convert")
    
29.       ("button" "曲线倒角" "_XDTB_PLineFillet")
    
30.       ("button" "等分开口" "_XDTB_CurveDivBrkGap")
    
31.       ("button" "转铁路线" "_XDTB_Curve2TailRoad")
    
32.       ("button" "删超短线" "_XDTB_CurveDelSL")
    
33.       ("button" "域外TRIM" "_curve_trim")
    
34.       ("button" "绘中轴线" "_dline_midx")
    
35.       ("button" "等距连线" "_curve_lx")
    
36.      )
    
37.   )
    
38.   (princ)
    
39. )
    

(defun c:xdtb_menu_curveedit ()<br />   (XD::ODCL:MENU<br />     1<br />     '(" 曲线线工具集 " 240 360 3 70 24 8 20000)<br />     '(<br />       ("button" "消除重线" "_xdtb_curveremovedup")<br />       ("button" "曲线布尔" "_curve_boole")<br />       ("button" "曲线要素" "_xdtb_curveys")<br />       ("button" "曲线方向" "_XDTB_CurveDirec")<br />       ("button" "局部曲线" "_XDTB_CurveSub")<br />       ("button" "定距伸缩" "_XDTB_CurveDJYS")<br />       ("button" "加粗曲线" "_plw_match")<br />       ("button" "局部加粗" "_XDTB_CurveSubJc")<br />       ("button" "多重偏移" "XDTB_CurveOffset")<br />       ("button" "局部偏移" "_XDTB_CurveSubOffset")<br />       ("button" "三线切弧" "_XDTB_Crv3TArc")<br />       ("button" "圆公切线" "_XDTB_Cir2Tan")<br />       ("button" "曲线断开" "_XDTB_mbrk")<br />       ("button" "交点断开" "_curve_intbrk")<br />       ("button" "封闭曲线" "_curve_setclosed")<br />       ("splitter" "" "")<br />       ("button" "3D转2D线" "_XDTB_3DPL2LW")<br />       ("button" "曲线转向" "_XDTB_reverse")<br />       ("button" "曲线转换" "_XDTB_CurveConvert")<br />       ("button" "曲线变折" "_XDTB_CIR2JX")<br />       ("button" "折线转弧" "_XDTB_JX2ARC")<br />       ("button" "转 SPL圆" "_XDTB_SPL2CIR")<br />       ("button" "POLY互转" "_XDTB_convert")<br />       ("button" "曲线倒角" "_XDTB_PLineFillet")<br />       ("button" "等分开口" "_XDTB_CurveDivBrkGap")<br />       ("button" "转铁路线" "_XDTB_Curve2TailRoad")<br />       ("button" "删超短线" "_XDTB_CurveDelSL")<br />       ("button" "域外TRIM" "_curve_trim")<br />       ("button" "绘中轴线" "_dline_midx")<br />       ("button" "等距连线" "_curve_lx")<br />      )<br />   )<br />   (princ)<br /> )<br />

evayleung

谢谢分享。。。。。。。。。。。。。。。。。

kqqt6236

谢谢分享。

liangzhx123456

看看。。。。。。。。

coverne

谢谢分享。

longer88

谢谢分享。