[求助]：关于标注的一个问题

HLB_Konan · 发表于 2006-6-2 15:11:35

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

希望高手能给我编一个我当前层do 标注时自动进入dim层标注完后当前层还是do层谢谢了补充一下当前层可以是任何一个层不一定是do层但标注是dim层

橄榄滋味 · 发表于 2006-6-2 16:47:17

(DEFUN C:TEST()
(SETQ CLA(GETVAR "CLAYER") CMD(GETVAR "CMDECHO"))
(SETVAR "CLAYER" "DIM")(SETVAR "CMDECHO" 1)
(COMMAND "_DIMLINEAR" PAUSE PAUSE PAUSE)
(SETVAR "CLAYER" CLA)(SETVAR "CMDECHO" CMD)
)
其余以此类推

HLB_Konan · 发表于 2006-6-2 16:55:22

谢谢啊不过怎么标注时没有修改数据这一步了？

橄榄滋味 · 发表于 2006-6-5 08:43:18

修改数据这一步是哪一步？你什么版本CAD？

fsxm · 发表于 2006-6-5 09:02:34

如果用2005及以上这个东东完不用程序工具面板里可以设置！

(DEFUN C:TEST()
(SETQ CLA(GETVAR "CLAYER") CMD(GETVAR "CMDECHO"))
(SETVAR "CLAYER" "DIM")(SETVAR "CMDECHO" 1)
(COMMAND "_DIMLINEAR" )
(while
(/= 0 (getvar "cmdactive"))
(command PAUSE)
)
(SETVAR "CLAYER" CLA)(SETVAR "CMDECHO" CMD)
)
试下吧！

HLB_Konan · 发表于 2006-6-7 10:50:05

修改数据俺你的程序我标注完程序也就执行完我们运行cad初始命令标注时即"dim","hor"时，他会有提示输入数值这一步不修改就是默认的距离不知道我又没有说清这个问题谢谢楼上两位

fsxm · 发表于 2006-6-7 11:02:36

知道你说的是这个东东吧？你想用里面的关键字功能：
[多行文字(M)/文字(T)/角度(A)/水平(H)/垂直(V)/旋转(R)]
[多行文字(M)/文字(T)/角度(A)]
等等！
加入：
(while
(/= 0 (getvar "cmdactive"))
(command PAUSE)
)
就可以达到你要的功能了！试试看吧！

HLB_Konan · 发表于 2006-6-20 23:19:06

再次求助在用这个lisp时出现的问题按楼上的程序当使用连续标注时即将"_DIMLINEAR"改为"_dimcontinue"时，连续标注超过3个后就回到当前层了即前三个是在dim层后面就跑到当前层了感觉应该是3个pause的问题不知道楼上能不能帮忙解决掉先谢谢了

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：关于标注的一个问题

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子