Acad_TrueColorCli 从命令行中选择 AutoCAD 真彩色
<P id=crleadin class=cr_leadin>从命令行中选择 AutoCAD 真彩色</P><PRE class=prog_in_end>(acad_truecolorcli color )</PRE><P class=Heading-2>参数</P>
<P class=define_head>color</P>
<P class=define_text>点对，它用于指定颜色对话框的缺省的颜色。点对的第一个元素必须是颜色的DXF组码(62、420 或 430)中的一个，如：</P>
<P class=define_text>(62 . 颜色索引值)<BR>(420 . 真彩色值)<BR>(430 . "配色系统$颜色名")</P>
<P class=define_head>allowbylayer</P>
<P class=define_text>如可选参数 allowbylayer 设为非 nil 值，或省略该参数时，则缺省值为 T，此时“随层”和“随块”有效。</P>
<P class=define_head>alternatePrompt</P>
<P class=define_text>提示字符串，如果忽略该参数，则会显示“新颜色 [真彩色(T)/配色系统(CO)] <1 (红色)>:”其中“<1 (红色)>”内容与color参数的设置有关。 </P>
<P class=Heading-2>返回值</P>
<P class=body>用户取消该对话框则返回 nil，成功时，返回用户所选择的颜色的一个或多个点对的列表。列表中的最后一个点对确定了所选择的颜色。以下为返回列表的详细资料：</P>
<P class=body>配色系统颜色 - 如果返回列表的最后一项为430点对，则是由配色系统中指定颜色。(返回的列表将同时包含了相对应真彩色的420点对和最接近的颜色索引值的62点对)。</P>
<P class=body>真彩色 - 如果返回列表的最后一项为420点对，则指定的是真彩色(即“红、绿、蓝)。该列表将同时包含最接近的颜色索引值的62点对。(此时并没有430点对)</P>
<P class=body>颜色索引 - 如果返回列表的最后一项为62点对，则选定了颜色索引。(此时并没有返回其它点对)</P>
<P class=Heading-2>示例</P>
<P class=body>下列代码提示用户选择一种颜色，如果不选则指定绿色为缺省颜色：</P><PRE class=prog_in_end>(acad_truecolorcli '(62 . 1))
(acad_truecolorcli '(420 . 2686760))
(acad_truecolorcli '(430 . "Color Book Sample File$Sample 0C"))
(acad_truecolorcli '(420 . 2686760) nil)</PRE> 示例预留 看看怎么做
页:
[1]