社区 › 编程申请 › 如何在lisp里面调用xplode命令炸开全部物体

kenken 发表于 2020-2-8 19:28:41

如何在lisp里面调用xplode命令炸开全部物体

本帖最后由 kenken 于 2020-2-14 22:09 编辑

(command "xplode" "ALL"　"" "g""i")

能帮我看一下，为什么总提示    （未知命令“XPLODE”。按 F1 查看帮助。）

ntwison 发表于 2020-2-8 19:28:42

kenken 发表于 2020-2-14 21:52
no function definition: VLAX-GET-ACAD-OBJECT高版本好用，2008有这个提示，
谢谢您的回答

(vl-load-com),有没有加上这个？
加在最前面看看

13529444157 发表于 2020-2-9 00:23:27

cad命令输入错误(command "explode")

13529444157 发表于 2020-2-9 00:23:55

cad命令输入错误(command "explode")

kenken 发表于 2020-2-9 06:29:36

有 xplode命令

ntwison 发表于 2020-2-14 00:57:49

本帖最后由 ntwison 于 2020-2-14 01:35 编辑

command不能使用xplode，xplode不是cad的内部命令，之所以能在CAD命令行输入该命令后像一个普通的如copy等命令一样运行，是因为CAD运行时调用了用arx定义的一个lsp定义函数。
如果你一定要使用这个的话，下面2个代码可以替代下：
1.(vla-sendcommand (vla-get-activedocument (vlax-get-acad-object)) (strcat "XPLODE" "\n" "ALL\n\n" "G\n" "I\n"))；这里要求你的图上块的数量要大于1
2.(vla-sendcommand (vla-get-activedocument (vlax-get-acad-object)) (strcat "XPLODE" "\n" "all\n\n"   "I\n"));这个要求你的图上块的数量等于1

琴剑江山_10184 发表于 2020-2-14 14:02:38

本帖最后由 琴剑江山_10184 于 2020-2-14 14:19 编辑

(vla-sendcommand (vla-get-ActiveDocument (vlax-get-acad-object)) (strcat "xplode" "\n" "\n"))
(Defun c:Tt ()
(vlax-add-cmd "XXplode" 'C:xplode)
(command "XXplode" "ALL" "" "g" "I")
(princ)
)这样就可以用了

kenken 发表于 2020-2-14 21:18:52

多谢回答，请问2008下能运行不

ntwison 发表于 2020-2-14 21:37:41

kenken 发表于 2020-2-14 21:18
多谢回答，请问2008下能运行不

直接试一下不就好了，我的CAD是2007版的，好用。

kenken 发表于 2020-2-14 21:52:16

no function definition: VLAX-GET-ACAD-OBJECT高版本好用，2008有这个提示，
谢谢您的回答

查看完整版本: 如何在lisp里面调用xplode命令炸开全部物体