[求助]：在CAD2002中用R14的特性修改的问题？

kaishuibaihn

我在用CAD2002时，常想查查字体的高度，以前在R14的特性修改中可以很方便的查到，感觉CAD2002的特性修改很烂，内容太多了看的我晕死过去。上回装了一个R14的特性修改的补丁，可是不能使用快捷键要打全称感觉也很麻烦。哪位高手有什么
解决的办法没有？

xcajcj

最初由 kaishuibaihn 发布
[B]我在用CAD2002时，常想查查字体的高度，以前在R14的特性修改中可以很方便的查到，感觉CAD2002的特性修改很烂，内容太多了看的我晕死过去。上回装了一个R14的特性修改的补丁，可是不能使用快捷键要打全称感觉也很麻烦... [/B]

我曾经将R14的特性修改移植在了2002下，如下图，不知是不是你想要的。

kaishuibaihn

是呀，你怎么建立的图标，如果不能快捷键用图标点击也是一个好办法。

xcajcj

这是我以前搞的一个补丁，希望对你有用。

使用方法：

1.在acad.mnl下加入下面的程序代码

;;=================================================================================================

(defun c:ai_propchk ( / a)
  (setq m:err *error* *error* *merr*)
  (if (not (setq a (ssget  "_I")))
      (setq a (ssget))
  )
  (if (> (sslength a) 1)
    (progn
      (if (not ddchprop)
        (load "ddchprop")
      )
      (setq *error* m:err m:err nil)
      (ddchprop a)
    )
    (progn
      (if (not ddmodify)
        (load "ddmodify")
      )
      (setq *error* m:err m:err nil)
      (ddmodify (ssname a 0))
    )
  )
  (princ)
)

;;=================================================================================================

2.在acad.mnu下的“对象特性”工具条最后加入如下语句：

ID_Ai_propch14 [_Button("特性", "ai_propchk.bmp", "ai_propchk.bmp")]^C^Cai_propchk

3.在帮助***HELPSTRINGS节下加入如下语句：

ID_Ai_propch14 [选择单个对象则运行 DDMODIFY，否则运行 DDCHPROP:   ai_propchk]

4.将R14下的ddchprop.dcl、ddchprop.lsp、ddmodify.dcl和ddmodify.lsp四个文件拷入R2002下的Support目录中。

5.键入“menu”命令选择“acad.mnu”菜单文件重新编译即可。

6.在“acad.pgp”中添加“AI, *AI_PROPCHK”即可使用快捷命令“AI”弹出“修改特性”对话框。

压缩包内有上述所有文件，将其拷入2002的Support目录下即可。

tonylee

好，试了一下，比我原来的改法高明的多，佩服，感谢！

kaishuibaihn

感谢。

极度寒冷

请问xcajcj长老，移植到2004下也可以使用吗？

ganok

你们这是用老牛来拉轿车。想方便查字高用list命令，就2个字母：LI。