achenery 发表于 2003-9-19 10:25:00

各位高手,请指点:如何从已有的autocad图形中提取数据信息(比如坐标、标注)到文

各位高手,请指点:如何从已有的autocad图形中提取数据信息(比如坐标、标注)到文本文件?

myfreemind 发表于 2003-9-20 22:25:00

传副图上来看看!

tjztsh 发表于 2003-9-21 02:21:00

在工作中,会碰道在绘好的图上(比如一个多边形)提取拐点的坐标,如果先记录下来再输入到WORD表格中就很麻烦。请黑侠编一个。

runkeji 发表于 2003-9-24 15:30:00

(defun jx ()
(setq as(car(entsel"請選取一個矩形吧")))
(setq ac (ENTGET AS))
(setq n 0)
(setq sidian nil)
(while (setq pand (assoc 10 ac))
    (progn
      (setq jieduan (member pand ac))
      (setq one (cdr pand))
      (setq ac (cdr jieduan))
      (setq sidian (cons one sidian))
    )
)
)
程序返回矩形的四个点

tnt33 发表于 2003-9-27 14:12:00

这是什么编程?
页: [1]
查看完整版本: 各位高手,请指点:如何从已有的autocad图形中提取数据信息(比如坐标、标注)到文