Kean专题(9)—Object_Properties 显示CAD颜色对话框 http://bbs.mjtd.com/forum.php?mod=viewthreadtid=77587extra=highlight=Transparencypage=2 如果只显示索引颜色的话,需做下列修改: Autodesk.AutoCAD.Windows.ColorDialog cd = new Autodesk.AutoCAD.Windows.ColorDialo ...
;; pline,lwpline点坐标表 By 无痕 ;; (LC:WH-vxs (car (entsel))),返回三维点坐标 (defun LC:WH-vxs (e / i v lst) (setq i -1) (while (setq v (vlax-curve-getpointatparam e (setq i (1+ i)))) (setq lst (cons v lst)) ) (reverse ls ...