jim66xy 发表于 2025-1-16 20:17:41

为什么在现有图形上创建点，Z值不起作用

本帖最后由 jim66xy 于 2025-1-16 22:15 编辑

最近刚学习AUTOLISP，发现创建点时在现有图形上Z值不起作用？在图纸空白处Z值正常，请高手指导一下，怎么确保创建点时Z值不受影响。

[*](defun c:wbt_Form1_TextButton1_OnClicked (/)
[*](setq X (dcl_Control_GetText wbt_Form1_TextBox1))
[*](setq Y (dcl_Control_GetText wbt_Form1_TextBox2))
[*](setq Z (dcl_Control_GetText wbt_Form1_TextBox3))
[*](command "POINT" (list (read X) (read Y) (read Z)))
[*])
还真是奇怪，entmake 可行，不知道为什么？代码如下：
(entmake (list '(0 . "POINT") (cons 10 (list X Y Z))))








gzcsun 发表于 2025-1-16 20:58:50

试试(setvar "osmode" 0)

kozmosovia 发表于 2025-1-16 21:07:20

本帖最后由 kozmosovia 于 2025-1-16 21:12 编辑

应该是捕捉问题，使用entmake或者vla-AddPoint添加
页: [1]
查看完整版本: 为什么在现有图形上创建点，Z值不起作用