[求助]：〓〓〓CAD2005如何修改字体？及一些小问题〓〓〓

2247700

安装CAD2005后无论是输入文字还是双击修改文字的时候，无法弹出输入文字的窗口。命令行提示：_.mtedit 无法找到 SHELL 程序
请问是怎么回事呢？在论坛上也查到这个问题！不知道和我一样用2005的同仁们遇到过这样的问题嘛~~
（PS：如果把电脑上的CAD版本都卸了，只安装2005的话，双击文字修改就正常！真是怪了！）
另外问三个问题，希望知道的朋友指点一下，不胜感激！
一个是记得CAD有一个命令是选择的物体保留，没选上的东西会被删除掉，我忘记了是什么命令~~~
再一个是酒店中的四季厅的定义是什么？
最后是，填充图案原点的功能只有2006有吗？2005里有吗？
期待解答！

qjcpj

问题还挺多的，先回答第一个和第二个吧！
第一个：
1.在命令行输入mtexted。
2.在提示行输入一个点(.)。
3.按enter结束命令。
第二个：

2. 
   
3. ;;;保留所需
   
4. (defun c:blsx        (/ s1 s2 n)
   
5.         (setq        s1 (ssget)
   
6.                                 s2 (ssget "X")
   
7.         )
   
8.         (if        (not s1)
   
9.                 (command "erase" s2 "")
   
10.                 (progn
    
11.                         (setq        s3 (ssadd)
    
12.                                                 n         0
    
13.                         )
    
14.                         (repeat        (sslength s2)
    
15.                                 (setq ent (ssname s2 n))
    
16.                                 (if        (not (ssmemb ent s1))
    
17.                                         (ssadd ent s3)
    
18.                                 )
    
19.                                 (setq n (1+ n))
    
20.                         )
    
21.                         (command "erase" s3 "" "redraw")
    
22.                 )
    
23.         )
    
24.         nil
    
25. )
    

<br /> ;;;保留所需<br /> (defun c:blsx        (/ s1 s2 n)<br />         (setq        s1 (ssget)<br />                                 s2 (ssget "X")<br />         )<br />         (if        (not s1)<br />                 (command "erase" s2 "")<br />                 (progn<br />                         (setq        s3 (ssadd)<br />                                                 n         0<br />                         )<br />                         (repeat        (sslength s2)<br />                                 (setq ent (ssname s2 n))<br />                                 (if        (not (ssmemb ent s1))<br />                                         (ssadd ent s3)<br />                                 )<br />                                 (setq n (1+ n))<br />                         )<br />                         (command "erase" s3 "" "redraw")<br />                 )<br />         )<br />         nil<br /> )<br />

2247700

首先谢谢长老的帮助~~
但请问字体修改那个是什么原因呢？还有那个保留所选的好像是CAD自代的命令，用的上代码吗？(其实我不知道怎么用那个代码)呵呵！

papayaa

因为你用了“移植”，安装的时候不要“移植”以前的文件