本帖最后由 無恒的地盘 于 2013-4-18 13:00 编辑
属性块会多一出行字
结构同行啊,支持一下~
很不错,但对块内方字好象不理想
真正实用程序,一直想编制(拥有)这样功能程序。谢谢楼主!
挺实用的
先流个脚印
本帖最后由 USER2128 于 2013-4-20 10:04 编辑
左键正常,右键可以减1,但随即结束了程序(不可连减)。被编辑过的文字仍成无名组状态(CAD2012,xp,32位)。
究其原因是在按右键返回11后,附带会产生12码,
;;; 测试(car (grread t 4 2))的返回值,按键盘上任一键结束
;(while (/= (progn (princ "\n") (princ (car (grread t 4 2)))) 2))
建议:加入去“无名组 ”程式、中途出错处理程式。
加入对多行文本的支持。
楼主相当V5
赞一个!
要是能递增就好了
支持什么文字呢?是不是只支持单行文字,支持不支持多行文字和属性文字及块内文字,还有天正文字,