尘缘一生 发表于 2024-1-17 23:24:14

[三领设计] 色板函数分享

本帖最后由 尘缘一生 于 2024-1-18 16:27 编辑



取色函数：支持简体、繁体、英文版语言各版本CAD





[*](action_tile "box" "(setq col (atoi (get_tile \"box\")))")

修改加一句：支持直接输入色号

d1742647821 发表于 2024-1-18 09:41:45

本帖最后由 d1742647821 于 2024-1-18 09:47 编辑

这玩意cad不是有自带的函数吗，直接调用cad的颜色选择窗口
lisp代码 (acad_colordlg 0) 其中0为默认选中的颜色索引

飞雪神光 发表于 2024-1-18 10:14:03

这个功能的意义是什么呢 多了个点取和扫黄么

尘缘一生 发表于 2024-1-18 10:23:09

飞雪神光 发表于 2024-1-18 10:14
这个功能的意义是什么呢 多了个点取和扫黄么

不对，如果是自己作代码，可以做到，一键即退出，否则你还得双击或点确定。
再就是可以自己做点特色进去。

wangsr 发表于 2024-1-18 10:31:34

谢谢分享，这个点取实用，可以查到别人的线是什么色的编号

尘缘一生 发表于 2024-1-18 20:43:11

wangsr 发表于 2024-1-18 10:31
谢谢分享，这个点取实用，可以查到别人的线是什么色的编号

如果这样，也可以改为点取后，回来界面显示色号，

wangsr 发表于 2024-1-18 22:07:44

这个按键怎么用

尘缘一生 发表于 2024-1-18 22:18:41

wangsr 发表于 2024-1-18 22:07
这个按键怎么用
这个涉及不少东西，一键对全图黄色系的换色问题。外连的整合功能，你可以换为其他，或作废。

wangsr 发表于 2024-1-19 08:15:45

尘缘一生 发表于 2024-1-18 22:18
这个涉及不少东西，一键对全图黄色系的换色问题。外连的整合功能，你可以换为其他，或作废。

谢谢我试试。
页: [1]
查看完整版本: [三领设计] 色板函数分享