关于lisp的一些困惑，高手来指点迷津吧。谢谢

ljpfeng2004

1.我想用lisp做出自己需要的快捷键完全脱离acad.pgp文件中的快捷键，可是碰到了一些问题，如（command "close"）这个命令就只能用命令行的方式存在，能否改成弹出式的呢？还有（command "copy"）怎样能自动变成多重复制的情况，我试了几次均失败了。以上问题请高手给个代码并自己验证一下先，谢谢了。
8 p% x; F7 r" z/ [7 f+ }; L2.autolisp对于各个版本的cad是否是有区别呢？
& ~0 x2 C( m6 Q8 x* r8 R


小菜鸟敬上。再次致谢

ljpfeng2004

1# ljpfeng2004
, W8 y$ a9 i* d. ^% j( A& I高手今天都休息吗？、

SunVei

Try this

, t3 A) a2 S& I3 m! [  (vla-SendCommand
8 S& @2 I' r1 ?" M    (vla-get-ActiveDocument (vlax-get-acad-object))
/ ~0 D& z8 X3 J7 U7 [3 P1 A    "Close "
' ^1 h) Y$ u0 Q" V- q7 B  )
, `1 Y* Z2 L# f4 F1 t3 ~" y" @  
( w6 u- A$ d# j2 j' g" u* _0 c================================  
  
+ d! f- o) h) R, C" W* F/ o3 }  (command "Copy" (ssget) "" "M")