lengliqun 发表于 2010-5-26 10:32:00

求lsp小程序，只拉伸特定图层"dote"的line与pline。

求lsp小程序，只拉伸特定图层"dote"的line与pline。

ZZXXQQ 发表于 2010-5-26 10:47:00

<p><br/>(defun c:tt ()<br/>&nbsp;(setvar "CMCECHO" 0)<br/>&nbsp;(setq cln (getvar "CLAYER"))<br/>&nbsp;(setvar "CLAYER" "dote")<br/>&nbsp;(command "-LAYER" "F" "*" "")<br/>&nbsp;(command ".STRETCH" PAUSE PAUSE PAUSE)<br/>&nbsp;(command "-LAYER" "T" "*" "")<br/>&nbsp;(setvar "CLAYER" cln)<br/>&nbsp;(setvar "CMDECHO" 1)<br/>&nbsp;(princ)<br/>)<br/></p>

lengliqun 发表于 2010-5-28 00:57:00

<p>呵呵，能达到拉伸的目的，但若想以其它图层的物体为拉伸的参考，就有点麻烦了。</p>

ruirui999 发表于 2011-4-19 16:39:20

我这里昨个不能动行呢？

ruirui999 发表于 2011-4-19 17:30:52

不错，经过我自己修改结合我的绘图软件后带来了不少便利。谢谢哇。

594822330 发表于 2011-5-1 13:43:16

汗 看不到····

dewey2686371 发表于 2011-8-26 09:18:53

好可怜，看不见
页: [1]
查看完整版本: 求lsp小程序，只拉伸特定图层"dote"的line与pline。