几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量

几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 (http://www.dimcax.com/hust/index.php)
-   ObjectARX(AutoLISP) (http://www.dimcax.com/hust/forumdisplay.php?f=178)
-   -   [求助] lisp判断某个命令执行是否完成? (http://www.dimcax.com/hust/showthread.php?t=10872)

yang686526 2009-04-25 10:32 PM

[求助] lisp判断某个命令执行是否完成?
 
[求助] lisp判断某个命令执行是否完成?
www.dimcax.com
[求助] lisp判断某个命令执行是否完成?
(setvar "clayer" cen)
(if (tblsearch "block" blk_name) ;查找块
(command "insert" blk_name "s" "1" pause pause pause pause) ;插入本地块
(command "insert"
(findfile (strcat blk_name ".dwg"))
"s"
"1"
pause pause
pause pause
) ;插入搜索块
)
)
)
(setvar "clayer" clayer_bak)
(princ)
我程序里面的一段,我现在郁闷的是 红色的地方只能治标不能治本,因为人不同的话操作不同,我喜欢按ctrl+捕捉方式
别人有可能直接点
有没有办法让我插入块后让程序判断插块命令完全结束了再执行(setvar "clayer" clayer_bak)么
潜水打捞海底资源
d
(getvar "cmdactive")
d
3q 谢谢
潜水打捞海底资源
d


所有的时间均为北京时间。 现在的时间是 06:46 AM.