明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 8433|回复: 44

[源码] LISP创建多重引线样式—源码分享

    [复制链接]
发表于 2022-4-18 20:05:00 | 显示全部楼层 |阅读模式
工作习惯,喜欢使用多重引线进行标注,包括文字标注和里程桩号标注。



历经波折,也参考了许多群里前辈的帖子,终于成功创建出了自己需要的多重引线样式。
论坛里前辈们分享的帖子,对DXF组码的备注和取值的说明,多数比较简略,对于个性化需求来说不太友好。
我这个Lisp尽量对DXF组码的取值进行了必要的说明,方便需要的朋友进行个性化定制。


另外,我这个lisp末尾还有新建文字样式,新建了“宋体”。好多新同学不知道如何用lisp创建字体时引用truetype宋体,这个案例可以提供参考。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x

评分

参与人数 3明经币 +3 收起 理由
自贡黄明儒 + 1 很给力!
xj6019 + 1 赞一个!
masterlong + 1 赞一个!

查看全部评分

"觉得好,就打赏"
还没有人打赏,支持一下
 楼主| 发表于 2022-11-30 17:10:07 | 显示全部楼层
zhangcan0515 发表于 2022-11-30 11:23
说 342  那个有问题

因为342这里引用了一个文字样式“仿宋体”,如果未事先定义“仿宋体”的话,自然会报错
回复 支持 1 反对 0

使用道具 举报

发表于 2024-4-17 17:18:57 | 显示全部楼层
天天问 发表于 2024-4-5 14:23
箭头类型如何设置确实还没有找到解决办法。如果不想要箭头,可以尝试变通一下:设置箭头大小为0,效果一 ...

(cond ((= (car myconfig-mle-mark) "0") (vla-put-ArrowSymbol obj "_OBLIQUE" ))
                       ((= (car myconfig-mle-mark) "1")(vla-put-ArrowSymbol obj "_ARCHTICK" ) (setq mleblk "_ARCHTICK"))
                       ((= (car myconfig-mle-mark) "2")(vla-put-ArrowSymbol obj "_DOT" ) (setq mleblk "_DOT"))
                       ;(t (setq mleblk "")) vla-put-ArrowSymbol obj "" 不能设置为箭头,程序默认为箭头
                 )       
可以用vl来设置。不过(vla-put-ArrowSymbol obj "" )不能设置为箭头,程序默认为箭头
发表于 2023-12-27 15:32:04 | 显示全部楼层
Leolaputa 发表于 2023-12-23 00:13
创建的多重引线无法像普通的那样镜像,有解决办法吗?
镜像创建的多重引线只会把箭头朝向改变了,箭头起点 ...

解决了,只要设置了基线就可以了。无基线下镜像就会出现文字无法镜像的问题。
发表于 2022-4-18 20:24:13 | 显示全部楼层
恭喜 恭喜 终于研究成功  支持一下!
 楼主| 发表于 2022-4-18 20:26:56 | 显示全部楼层
xj6019 发表于 2022-4-18 20:24
恭喜 恭喜 终于研究成功  支持一下!

感谢支持,要学习的还有很多
发表于 2022-4-19 09:21:39 | 显示全部楼层
冲你这标注,买了。支持下好学的同学
发表于 2022-4-19 09:53:30 | 显示全部楼层
支持下好学的同学
 楼主| 发表于 2022-4-19 11:53:51 | 显示全部楼层
AndyWang 发表于 2022-4-19 09:21
冲你这标注,买了。支持下好学的同学

感谢支持,请多指教
 楼主| 发表于 2022-4-19 11:55:21 | 显示全部楼层
zghmaya 发表于 2022-4-19 09:53
支持下好学的同学

感谢支持,请多指教
发表于 2022-4-19 12:06:01 | 显示全部楼层
很好很好,终于等到了
发表于 2022-4-19 15:09:32 | 显示全部楼层
购买表达支持!
 楼主| 发表于 2022-4-19 15:31:06 | 显示全部楼层
e2002 发表于 2022-4-19 15:09
购买表达支持!

感谢老版主的支持和鼓励
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-25 06:29 , Processed in 0.195800 second(s), 35 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表