紧急求助!!!SOS!关于TEXTMASK的问题!!!!

petertian

各位大侠及板柱,我用单个(TEXTMASK)明令修改TEXT,一切正常,但是,用了以下程序之后,出现了COMMAND命令不认TEXTMASK,怎么回事?不胜感激!!谢谢!!程序如下:

(defun c:cht()
    (setq ss (ssget "x" (list (cons 0 "TEXT"))))
   (if ss
      (progn
         (princ "\nPlease wait...")
         (setq n 0 m (sslength ss))
         (princ m)
         (while (< n m)
            (setq entname (ssname ss n))
            (command "textmask" "off" "0.18" entname "")
            (setq n (+ 1 n))                     
         )
      )
   )
   (princ)
)
/////////////////////////////////
出现错误如下:
Command: cht
Please wait...536textmask Unknown command "TEXTMASK".  Press F1 for help.
Command: off Unknown command "OFF".  Press F1 for help.
Command: 0.18 Unknown command "0.18".  Press F1 for help.
Command: <Entity name: 26D0938>[em00]

龙龙仔

TEXTMASK是EXPRESSTOOL中指令,你要直接修改TEXTMASK.LSP程序才能配合你的需求

陈伯雄

用(Command)函数当然不能引用。
打开这个程序，看看是怎么写的，照葫芦画瓢就行了...