明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1468|回复: 6

[求助]如何获取颜色编号

[复制链接]
发表于 2009-5-23 23:27:00 | 显示全部楼层 |阅读模式

如何获取所选颜色编号,并将编号写到记事本中.

"觉得好,就打赏"
还没有人打赏,支持一下
 楼主| 发表于 2009-5-23 23:29:00 | 显示全部楼层

本帖子中包含更多资源

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

x
 楼主| 发表于 2009-5-23 23:31:00 | 显示全部楼层
急用!在线等待您的帮助,谢谢.
 楼主| 发表于 2009-5-23 23:53:00 | 显示全部楼层
我已摸索差不多了
发表于 2009-5-24 09:20:00 | 显示全部楼层
  1. (defun c:tt (/ color file)
  2.   (if (and (setq color (acad_colordlg 256))
  3.            (setq file  (getfiled "保存到文件" "" "txt" 5))
  4.       )
  5.     (progn
  6.       (setq file (open file "w"))
  7.       (write-line (vl-princ-to-string color) file)
  8.       (close file)
  9.     )
  10.   )
  11.   (princ)
  12. )
 楼主| 发表于 2009-5-24 09:41:00 | 显示全部楼层

Thanks!!

发表于 2009-5-25 14:01:00 | 显示全部楼层

又學到啦!呵呵!

您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-9-29 18:18 , Processed in 0.186707 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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