明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1648|回复: 7

请各位帮忙看看我的程序是什么原因制成崩溃?

[复制链接]
发表于 2004-7-7 18:01:00 | 显示全部楼层 |阅读模式
先执行命令:sex1再执行命令:s1时Auto2002就会出现很重的错误! (defun C:SEX1()
(vl-load-com)
(setq cmdecho1 (getvar "cmdecho"))
(setq osmde1 (getvar "osmode"))
(setvar "cmdecho" 0)
(setvar "osmode" 0)
(prompt "\n选择要分解的对象:")
(setq ss (ssget '((0 . "POLYLINE,LWPOLYLINE,INSERT,MLINE"))))
(setq N 0)
(repeat (sslength ss)
(setq name(ssname ss N))
(setq nane-block-obj(vlax-ename->vla-object name))
(setq explodeobj(vla-explode nane-block-obj))
(vla-erase nane-block-obj)
(setq N(1+ N))
)
(setvar "cmdecho" cmdecho1)
(setvar "osmode" osmde1)
(princ)
)
(defun c:s1()
(setq cmdecho1 (getvar "cmdecho"))
(setq osmde1 (getvar "osmode"))
(setvar "cmdecho" 0)
(setvar "osmode" 0)
(setq ss(ssget '((0 . "LINE"))))
(setq n 0)
(repeat (sslength ss)
(setq name(ssname ss n))
(setq nate(entget name))
(setq pt1(cdr(assoc 10 nate)))
(setq pt2(cdr(assoc 11 nate)))
(entmake(list(cons 0 "LINE")(cons 10 pt2)(cons 11 pt1)))
(entdel name)
(setq n(1+ n))
)
(setvar "cmdecho" cmdecho1)
(setvar "osmode" osmde1)
(princ)
)

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
 楼主| 发表于 2004-7-7 18:12:00 | 显示全部楼层
我在Auto204里面执行就不会造成崩溃,会不会是我的Auto2002不好?
发表于 2004-7-7 18:18:00 | 显示全部楼层
A        sexy command :)
发表于 2004-7-7 19:42:00 | 显示全部楼层
无论如何,把变量写上再说!
 楼主| 发表于 2004-7-7 20:24:00 | 显示全部楼层
会不会跟"cmdecho"变量有关? 如果其它程序"cmdecho"变量为:1 程序就正常运行。 如果"cmdecho"变量为:0 程序就不正常运行。
发表于 2004-7-10 10:30:00 | 显示全部楼层
要用正版的,我以前用破解版也是经常崩溃。


后来下载一个英文版的,一切OK
 楼主| 发表于 2004-7-18 08:47:00 | 显示全部楼层
在哪下载?
 楼主| 发表于 2004-7-18 08:49:00 | 显示全部楼层
是免费?能不能提供网址?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-10-1 00:38 , Processed in 0.175918 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表