CommandSTR = "(Handent """ & Text.Handle & """)"
doc.SendCommand "TextMask" & vbCr & CommandSTR & vbCr
我这样写,AutoCAD提示:"无法重新进入Lisp",
我怀疑是使用TextMask时已经在使用Lisp,所以再调用Handent时不允许了。有没有改写后的masktext.lip文件或者别的办法达到这个目的。 其实真正的核心是wipeout.arx文件,TextMask.lsp也是调用wipeout.arx
页:
1
[2]