明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 941|回复: 12

[源码] 打造适合自己的快速建块功能

  [复制链接]
发表于 2024-7-24 13:34:14 | 显示全部楼层 |阅读模式
本帖最后由 xxyyzzlg 于 2024-7-25 07:57 编辑

   常用插件燕秀,贱人,源泉等都有快速建块的功能。不知道具体什么原因,我在用的时候都会改变遮罩的顺序,只能进块调整顺序,实在太麻烦。于是决定自己搞个小程序。感谢Z版等各位大佬分享的源码,使这一想法得以实现。
    结合我自己的使用习惯搞了如下几个版本,支持图块对象(包括匿名块):
1)改0层,图元信息不改。
2)改0层,颜色线型Byblock。
3)改0层,图层线型为中心线或图元线型为中心线,改红色中心线,否则颜色线型都改随块。
4)改0层,图层线型为中心线或图元线型为中心线,改红色中心线,否则颜色改随块,线型改Divide。
     有需要的朋友可以下载
     本人初学lsp,程序可能存在或多或少的问题,请不吝赐教。
比如:未加入线宽随块功能, 因为我也没搞清这个语句为啥不起作用。 (vla-put-Lineweight ob acLnWtByBlock)


07.25,如需要改变线宽,可以相应位置增加两行代码

              (vla-put-Lineweight ob X)
              (vla-Update ob)

其中X,可以是如下值
  • acLnWtByLayer
  • acLnWtByBlock
  • acLnWtByLwDefault
  • acLnWt000
  • acLnWt005  
  • acLnWt009
  • acLnWt013
  • acLnWt015
  • acLnWt018
  • acLnWt020 ......

本帖子中包含更多资源

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

x

点评

加油,努力!时代在召唤,未来属于你们的!  发表于 2024-7-26 08:47
 楼主| 发表于 2024-7-24 15:54:56 | 显示全部楼层
本帖最后由 xxyyzzlg 于 2024-7-24 15:56 编辑
你有种再说一遍 发表于 2024-7-24 15:13
改变次序是因为:
加入块表记录的时候是无序才导致这种事情,
在lisp你可能需要改动绘图次序实现...

这个遮罩顺序改变问题,不是插件和软件本身的锅。
可能我不小心动了哪个变量。
我试了下,用block命令成块会造成这个问题,用粘贴成块就没问题,所以我的代码用的 "._PASTEBLOCK"成块。
发表于 2024-7-24 15:13:53 | 显示全部楼层
改变次序是因为:
加入块表记录的时候是无序才导致这种事情,
在lisp你可能需要改动绘图次序实现...
在c#是:基变换,加入块表记录,插入基,逆基变换,
在第二步实现,不需要改变绘图次序,只需要加入序
发表于 2024-7-26 06:39:27 来自手机 | 显示全部楼层
你有种再说一遍 发表于 2024-7-24 15:13
改变次序是因为:
加入块表记录的时候是无序才导致这种事情,
在lisp你可能需要改动绘图次序实现...

惊佬,怎么获得对应的这个序?
发表于 2024-7-24 15:24:12 | 显示全部楼层
学习了一下
发表于 2024-7-24 15:41:45 | 显示全部楼层
谢谢分享,学习一下。
发表于 2024-7-24 16:03:27 | 显示全部楼层
xxyyzzlg 发表于 2024-7-24 15:54
这个遮罩顺序改变问题,不是插件和软件本身的锅。
可能我不小心动了哪个变量。
我试了下,用block命令 ...

这两命令的策略就不一样...
 楼主| 发表于 2024-7-24 16:17:38 | 显示全部楼层
莫名其妙就这样了

本帖子中包含更多资源

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

x
发表于 2024-7-24 21:40:47 | 显示全部楼层
过来学习来了
发表于 2024-7-26 13:01:21 | 显示全部楼层
Bao_lai 发表于 2024-7-26 06:39
惊佬,怎么获得对应的这个序?

直接搜绘图次序
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-9-8 08:29 , Processed in 0.313834 second(s), 31 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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