社区 › AutoLISP/Visual LISP 编程技术 › entmake创建图元必要条件(慢慢更新)

20060510412 发表于 2019-1-26 09:57:18

使用组码，太不符合直观印象了，还是vba的那种创建图元方式更直接

luhy2008 发表于 2019-7-4 14:19:44

写的很好 学习了

38804965@qq.com 发表于 2019-7-4 14:42:14

刚学习不久，先踩个坑再看看

sunny_8848 发表于 2019-9-30 09:15:04

请问这里的(entmake (list '(0 . "LINE") (cons 10 pt1) (cons 11 pt2)))，这里的pt1,pt2怎么改成具体的坐标？

mocheng 发表于 2019-10-13 21:40:28

谢谢楼主分享

JHX948954875 发表于 2019-10-14 09:28:32

谢谢楼主分享

hncjddd 发表于 2019-10-18 15:21:53

完美，膜拜老哥，感谢.................................

999999 发表于 2020-8-29 19:36:34

谢谢各位大神的分享，先收起来，有空看看，，加班加的都没有脾气了

nijiea123 发表于 2020-9-10 02:30:06

这个太棒了，必须顶

lee50310 发表于 2020-11-14 02:35:03

sunny_8848 发表于 2019-9-30 09:15
请问这里的(entmake (list '(0 . "LINE") (cons 10 pt1) (cons 11 pt2)))，这里的pt1,pt2怎么改成具体的坐 ...


(defun c:tt()
    (setvar "cmdecho" 0)
    (setq Pt1 (getpoint "\n第一點"))
    (setq Pt2 (getpoint pt1 "\n第二點"))

(entmake (list '(0 . "LINE") (cons 10 pt1) (cons 11 pt2)))

)

查看完整版本: entmake创建图元必要条件(慢慢更新)