现在还没有相册
现在还没有记录
现在还没有动态
现在还没有日志
-
- yoyoho
- 你好!http://bbs.mjtd.com/thread-169745-1-1.html帖中的”选中标注则选中与之相连的所有标注”修改有解决吗?
我也修改不出來啊!
-
- yoyoho
- 你好!http://bbs.mjtd.com/thread-169745-1-1.html帖中的”选中标注则选中与之相连的所有标注”修改有解决吗?
-
- llsheng_73
- 另外，是不是你在问批量打印的问题？不小心点一下找不到消息了
要不进论坛QQ群去方便联系？
-
- llsheng_73
- 一直没注意留言板，以前那个是有个问题，今天去看了下
theisland:
大侠 ; 错误: 输入的列表有缺陷~~~~我都不好意思再麻烦您了~~可惜又不会改~~
原(defun c:tt(/ss)应该改成(defun c:tt(/ ss)
因为我的疏忽给你的工作带来困扰，实在抱歉。。。
-
- langjs
- 加我QQ：59509100
theisland: 狼大侠，您那画轴测图的工具很好用，但是画直线那个命令有点不科学哦，轴侧图中是有水平直线的呀，能否增加水平方向的角度？http://bbs.mjtd.com/thread-92999-1 ...
-
- 邹锋
- 没有呀，GU版主有，我又不用
theisland: http://bbs.mjtd.com/thread-107689-1-1.html
l老大，能传我一份图纸目录生成的源码吗？
-
- llsheng_73
- (Defun STB(TAB / snl sll) (SetQ snl '()sll (TblNext TAB T)) (While (SetQ snl (Cons (Cdr (Assoc 2 sll)) snl)sll (TblNext TAB nil)))snl) (defun c:tt(/ ss) (sssetfirst'nil(setq ss(ssget"X"(list'(0 . "INSERT")(cons 8(apply 'strcat(vl-remove'nil(mapcar'(lambda(x)(if(equal(assoc 290(entget(TBLOBJNAME"layer"x)))'(290 . 0))(strcat","x)))(stb"layer"))))))))) (sslength ss)) ;;程序结束后它们是被选中的，你可以象自己选择了图元 ... ...
-
- edata
- 已经更改，看论坛回复。。
theisland: 大侠，您这个好程序希望能扩展一下，渴望至极！http://bbs.mjtd.com/thread-108707-1-1.html
最近访客
2025-04-14
2025-03-08
2025-02-22
群组
现在还没有群组