citykunan 发表于 2004-5-26 14:00:00

arc的端点的dxf码.

dxf码中有没有提供arc的端点的代码？谢谢。

BDYCAD 发表于 2004-5-26 14:09:00

沒有哦. 你可以用LISP寫程序求出來就是了

citykunan 发表于 2004-5-26 14:15:00

就是因为圆弧很难确定其形状，我是通过导角后产生的圆弧，想求出它的两个端点。不知有什么办法吗？

citykunan 发表于 2004-5-26 14:21:00

本帖最后由 作者 于 2004-5-26 14:41:25 编辑 <br /><br /> 我知道了可以通过50和51号码算出



(defun arc_point (arc / arc_center arc_radius start_angle end_angle)<BR>                       (setq arc_center (cdr (assoc 10 (entget arc))))<BR>                       (setq arc_radius (cdr (assoc 40 (entget arc))))<BR>                       (setq start_angle (cdr (assoc 50 (entget arc))))<BR>                       (setq end_angle (cdr (assoc 51 (entget arc))))<BR>                       (setq arc_startpoint (polar arc_center start_angle arc_radius))<BR>                       (setq arc_endpoint (polar arc_center end_angle arc_radius))<BR>        )

BDYCAD 发表于 2004-5-27 11:48:00

來個簡短的


(setq a (car (entsel)))<BR>(setq aa (vlax-curve-getPointAtParam A (vlax-curve-getstartparam A) ));一個對象的起點<BR>(setq aaa (vlax-curve-getPointAtParam A (vlax-curve-getEndParam A) ));一個對象的終點

龙龙仔 发表于 2004-5-27 12:25:00

傳回曲線的終點 (使用 WCS)               


(vlax-curve-getEndPoint curve-obj)


傳回曲線的起點 (使用 WCS)


        (vlax-curve-getStartPoint curve-obj)
页: [1]
查看完整版本: arc的端点的dxf码.