为什么两个线的共用端点提取出的DXF不相等呢？

Scarlet2001

xyp1964 发表于 2024-9-5 10:07

也是不行，我拿两条完全重合的线试了一下，还是没能输出存在共用端点

tryhi

Scarlet2001 发表于 2024-9-5 14:48
懂了，我理解错了，以为是逐一比较
但是把(not (/= p1 p2 p3 p4))改成(or (= p1 p2) (= p1 p3) (= p1 p4 ...

因为=不能比较“表”，或者准确来说，地址不同的表，用=对比则返回nil，你试试下面的代码

(setq
p1 '(1 2)
p2 '(1 2)
)
(= p1 p2) ;--> nil

tryhi

Scarlet2001 发表于 2024-9-5 14:51
也是不行，我拿两条完全重合的线试了一下，还是没能输出存在共用端点

院长的代码是可以的，你不行，证明你不是复制他的代码

Scarlet2001

tryhi 发表于 2024-9-5 15:22
院长的代码是可以的，你不行，证明你不是复制他的代码

我再试了一下，我的问题，代码加载错了，确实可以

Scarlet2001

tryhi 发表于 2024-9-5 15:19
因为=不能比较“表”，或者准确来说，地址不同的表，用=对比则返回nil，你试试下面的代码

(setq

也是说对比表的时候，要用equal而不能用=？

tryhi

Scarlet2001 发表于 2024-9-5 15:26
也是说对比表的时候，要用equal而不能用=？

是的