zhd81617 发表于 2014-10-25 15:27 static/image/common/back.gif
无函数定义: _ENDUNDO
我也是 找了半天没找到
大师能不能给个完整版的,老是出这样的错
反向跟踪:
(VL-BT)
(*ERROR* "参数列表尾部有错: 5.58222")
(_call-err-hook #<SUBR @148c5e38 *ERROR*> "参数列砦膊坑写? 5.58222")
(sys-error "参数列表尾部有错: 5.58222")
:ERROR-BREAK.33 nil
(APPLY MAPCAR (- . 5.58222))
(HHXD:MAKELT "△修改1次")
(C:HHXD)
(#<SUBR @148c5ed8 -rts_top->)
(#<SUBR @092c2334 veval-str-body> "(C:HHXD)" T #<FILE internal>)
:CALLBACK-ENTRY.6 (:CALLBACK-ENTRY)
:ARQ-SUBR-CALLBACK.3 (nil 0)
不知道是不是函数找错了
王与韩1 发表于 2014-11-3 15:44 static/image/common/back.gif
大师能不能给个完整版的,老是出这样的错
反向跟踪:
没有发现一个说可以用的，是不是黄老发了一个半成品上来，给高手帮忙改改？
lucas_3333 发表于 2014-11-3 20:12
没有发现一个说可以用的，是不是黄老发了一个半成品上来，给高手帮忙改改？
不会吧，我在其它电脑上也可用。要st788796那个构造文字长度，parse3，还有正则表达式
自贡黄明儒 发表于 2014-11-3 21:44 static/image/common/back.gif
不会吧，我在其它电脑上也可用。要st788796那个构造文字长度，parse3，还有正则表达式
长老，来个完整的吧，您传上来也就是希望分享给更多人，但大家现在都运行不了，您也很遗憾是吧
lucas_3333 发表于 2014-11-3 23:51 static/image/common/back.gif
长老，来个完整的吧，您传上来也就是希望分享给更多人，但大家现在都运行不了，您也很遗憾是吧
看了9楼，12楼，问题出在少函数HH:String:Len
;;公用----单行文字角点
;;构造文字长度(abs (car (apply 'mapcar (cons '- (HH:String:Len sty str h scl)))))
(defun HH:String:Len (sty str h scl)
(if (or (not sty)
(= sty "")
(not (tblsearch "style" sty))
)
(setq sty (getvar "textstyle"))
)
(textbox (list (cons 1 str) (cons 7 sty) (cons 40 h) (cons 41 scl)))
)
感谢楼主分享！
谢谢前辈,你给的函数放上去运行出来注释显示不了,如下图,正则表达式怎么用的呢?
终于能运行了，就是注释显示不了
自贡黄明儒 发表于 2014-11-4 13:43
看了9楼，12楼，问题出在少函数HH:Stringen
;;公用----单行文字角点
;;构造文字长度(abs (car (apply ...
加上这个，还是提示无函数定义_ENDUNDO。大佬能放一个完整的吗？这么好的插件不能运行，太可惜了