elitefish 发表于 2008-12-24 15:41:00

[讨论]什么变量控制 关闭当前层 无需确认

<p>原来写的层控制Lisp 在2008里发现经常出错 </p><p>原来 (command "layer" "Off" "*" "Y" "")隐藏全部层&nbsp; 中间需要输入Y来确认当前层</p><p>但最近转至cad2008里发现 关闭当前层有事需要确认 有时不需要确认 导致以前的程序无法顺利执行下去</p><p></p><p>求教系统里面<font color="#ff0000">什么变量控制 关闭当前层无需确认</font> 或者 <font color="#ff0000">有什么办法可以直接用Lisp对层进行控制 而不用command&nbsp; 就像用entmod编辑图元一样</font></p>

nonsmall 发表于 2008-12-24 16:15:00

<p>关闭当前层 不确认</p><p>(vlax-put-property (vlax-get (vlax-get (vlax-get-acad-object) 'ActiveDocument) 'ActiveLayer) 'LayerOn 0)</p>

elitefish 发表于 2008-12-24 23:30:00

<p>写写楼上 自己找到了 </p><p>EXPERT</p><p><table class="ruled" cellspacing="0" cellpadding="0"><tbody><tr class="RuledOddRow"><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e8"></a><p class="table-body">0</p></td><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e7"></a><p class="table-body">正常地显示所有提示。</p></td></tr><tr class="RuledEvenRow"><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e6"></a><p class="table-body">1</p></td><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e5"></a><p class="table-body">禁止显示“准备重生成，是否继续？”以及“是否确实要关闭当前图层？”(-<a href="ms-its:ACAD_ACR.chm::/LAYER.htm">LAYER</a>)</p></td></tr><tr class="RuledOddRow"><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e4"></a><p class="table-body">2</p></td><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e3"></a><p class="table-body">禁止显示上述提示和“已定义块。是否重定义？”(-<a href="ms-its:ACAD_ACR.chm::/BLOCK.htm">BLOCK</a>) 以及“此名称的图形已存在。是否覆盖？”（<a href="ms-its:ACAD_ACR.chm::/SAVE.htm">SAVE</a> 或 <a href="ms-its:ACAD_ACR.chm::/WBLOCK.htm">WBLOCK</a>）。</p></td></tr><tr class="RuledEvenRow"><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e2"></a><p class="table-body">3</p></td><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e1"></a><p class="table-body">禁止显示上述提示，以及尝试加载的线型已加载或尝试在文件中创建的新线型已定义时 <a href="ms-its:ACAD_ACR.chm::/LINETYPE.htm">LINETYPE</a> 命令行 (-LINETYPE) 所给出的提示。</p></td></tr><tr class="RuledOddRow"><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60e0"></a><p class="table-body">4</p></td><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60df"></a><p class="table-body">禁止显示上述提示，以及输入的名称已存在时 <a href="ms-its:ACAD_ACR.chm::/UCS.htm">UCS</a> 命令的“保存”选项和 <a href="ms-its:ACAD_ACR.chm::/VPORTS.htm">VPORTS</a> 命令的“保存”选项所给出的提示。</p></td></tr><tr class="RuledEvenRow"><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60de"></a><p class="table-body">5</p></td><td class="table-body"><a name="WSfacf1429558a55de2ab0a1008e4bf960-60dd"></a><p class="table-body">禁止显示“该名称已在使用，是否重新定义？”提示（输入的标注样式名已存在时 -<a href="ms-its:ACAD_ACR.chm::/DIMSTYLE.htm">DIMSTYLE</a> 命令的“保存”选项所给出的提示。） </p>禁止显示 -<span class="char_link"><a href="mk:@MSITStore:D:\Program%20Files\AutoCAD%202008\help\acad_acr.chm::/WS1a9193826455f5ffa23ce210c4a30acaf-53db.htm#WSc30cd3d5faa8f6d81bca5f1ffc2d61c40-7fed">SCALELISTEDIT</a></span> 系统变量“添加”选项发放的相同提示。</td></tr></tbody></table></p>

nonsmall 发表于 2008-12-25 08:47:00

跟楼上学习了
页: [1]
查看完整版本: [讨论]什么变量控制 关闭当前层 无需确认