找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 501|回复: 3

[推荐]:pkpm的梁板T图转到CAD下处理程序

[复制链接]

已领礼包: 9个

财富等级: 恭喜发财

发表于 2004-12-2 10:12:22 | 显示全部楼层 |阅读模式

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

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

×
(princ "\n选择要处理的图形:")
(setq ss0 (ssget));只选择要处理的部分图形
;
(if (setq ss (ssget "p" '((0 . "text") (8 . "水平标注,水平钢筋,垂直标注,垂直钢筋"))))
  (progn
    (xdrx_setsstodb ss 0)
    (while (setq e (xdrx_getentdata 0))
      (xdrx_modent 7 "pkpm" 40 2.5 41 0.7 72 0)
    )
  )
)
;
(if (setq ss (ssget "p" '((0 . "text") (8 . "支座钢筋标注,板底钢筋标注"))))
  (progn
    (xdrx_setsstodb ss 0)
    (while (setq e (xdrx_getentdata 0))
      (xdrx_modent 7 "pkpm" 40 2.3 41 0.7 72 0)
    )
  )
)
;;;;;
在这句(if (setq ss (ssget "p" '((0 . "text") (8 . "支座钢筋标注,板底钢筋标注"))))时ssget就返回nil了,请教各位在一个选择集中如何实现多次选择不同物体来分别处理。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2004-12-2 13:01:11 | 显示全部楼层
结构设计PKPM2004,09,14复制锁,一个锁,包含(s-1,s-2,s-3,s-4,s-5,pmsap,sts)送传统版APM!!

支持升级和支持与正版的狗互换   详情请咨询QQ248043091   

有偿提供CAD类型软件的破解
款到发货,绝对诚信,质量第一,价格优厚,凡是购买本人软件的客户,均可以升级
诚信经营,谢绝闲聊的  每周七个服务日,时刻提供答疑和咨询!
交易方式:银行存钱,当日快递
联系TEL:13927403063
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 9个

财富等级: 恭喜发财

 楼主| 发表于 2004-12-3 02:33:09 | 显示全部楼层
帮你顶一下,也帮我自己。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2004-12-4 00:21:31 | 显示全部楼层 |阅读模式

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

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

×
好像有点高深啊
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2025-9-10 08:31 , Processed in 0.386083 second(s), 41 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表