[建议]：理正建筑增加一个复制时不保留"组"的功能方便加快复制粘贴速度

Rulian

记得理正建筑在V2.5版本之前,复制与粘贴的速度与CAD里的复制粘贴速度是一样快的，到了V2.7版后，按QUN版主的说法，是为了复制时不破坏"组"而造成了复制粘贴速度变慢了，原来QUN版主说可以在“初始设置”里把“改造剪切板”不打“√”可使复制与粘贴的速度与CAD里的复制粘贴速度一样快,可是实践证明这样是不行的，速度还是慢得不能忍受！无办法，我现在只好还在用V2.5版，所以，为了我的正版能享受正版升级带来的乐趣，我建议QUN版主提供一个功能选择：增加一个复制时不保留"组"的功能方便加快复制粘贴速度(做到同CAD复制粘贴速度），让我早日升级到新的版本。希望QUN版主能重视一下这个问题，相信有很多用户也有我这种要求。

Qun

在【初始设置】里面，就“改造剪裁板”选项取消选择就可以了！

秋枫

如果只是临时切换的话，手动输入AutoCAD命令复制粘贴就行了，不要用快捷键。

复制命令是：.copyclip
（在copyclip命令之前有一个小数点不要忽略）

andyhua5240

(defun c:cv ()
  (princ "\n* AutoCAD原始复制 *")
  (setvar "cmdecho" 1)
  (command ".copyclip")
  (princ)
)

但是我做成lisp为何不行，只有第一次成功了，以后都不行？

2. 
   
3.   [FONT=courier new]
   
4. (defun c:cv ()
   
5.   (princ "\n* AutoCAD原始复制 *")
   
6.   (setvar "cmdecho" 1)
   
7.   (command "redefine" "copyclip")
   
8.   (command "redefine" "cutclip")
   
9.   (command "redefine" "pasteclip")
   
10.   (command "redefine" "copybase")
    
11.   (command "redefine" "pasteorig")
    
12.   (setq ss (ssget))
    
13.   (command "copyclip" ss "")
    
14.            (while (/= 0 (getvar "cmdactive")) (command pause))
    
15.   (command "undefine" "copyclip")
    
16.   (command "undefine" "cutclip")
    
17.   (command "undefine" "pasteclip")
    
18.   (command "undefine" "copybase")
    
19.   (command "undefine" "pasteorig")
    
20. 
    
21.   (princ)
    
22. )
    
23. 
    
24.   [/FONT]
    

<br />   [FONT=courier new]<br /> (defun c:cv ()<br />   (princ "\n* AutoCAD原始复制 *")<br />   (setvar "cmdecho" 1)<br />   (command "redefine" "copyclip")<br />   (command "redefine" "cutclip")<br />   (command "redefine" "pasteclip")<br />   (command "redefine" "copybase")<br />   (command "redefine" "pasteorig")<br />   (setq ss (ssget))<br />   (command "copyclip" ss "")<br />            (while (/= 0 (getvar "cmdactive")) (command pause))<br />   (command "undefine" "copyclip")<br />   (command "undefine" "cutclip")<br />   (command "undefine" "pasteclip")<br />   (command "undefine" "copybase")<br />   (command "undefine" "pasteorig")<br /> <br />   (princ)<br /> )<br /> <br />   [/FONT]<br />

这样也行不通，请秋枫大哥支招呀？
谢谢！