2017年9月23日
AutoLisp 返回字符串中某一子串首次出现的位置的函数
摘要： 1 ;返回字符串中某一子串首次出现的位置 2 (defun my_strstr(mstr zstr / retu) 3 (setq mstr_l (strlen mstr) zstr_l (strlen zstr)) 4 (if (<= zstr_l mstr_l) 5 ;主字符串长度大于或等于子字符长度 6 (progn 7 ... 阅读全文
posted @ 2017-09-23 22:57 钉钉铛铛 阅读(2282) 评论(0) 推荐(0) 编辑
AutoLisp 获得选中的单行文字的内容
摘要： 代码如下： 阅读全文
posted @ 2017-09-23 20:46 钉钉铛铛 阅读(3066) 评论(0) 推荐(0) 编辑