动态块图框-支持A2-A0标准及加长图框。支持项目信息。

vitalgg

动态块图框-支持A2-A0标准及加长图框。支持项目信息。


含自定义修改方法说明及相应管理插件的安装。



图框定制说明：
1、必须保留的两个属性定义（红色）：工程名称、图号。
  有这两个属性就可以使用@lisp工程管理进行操作了。
  如果需要编制图名的功能，需要保留 “图名” 属性
  其它属性定义（青色）可根据个人需求删减。
  所有属性定义的位置可以随意调整。
2、图签(黄色)部位的文本和线条可任意修改，如改为横向图框、增加公司标志等。
3、编辑图框块:
  方法1: CAD命令行输入 bedit ,然后选中图框块即可。
  方法2：点中图框块，鼠标右键，然后点菜单中的块编辑器。
  编辑完成后按工具条上的 “关闭块编辑器”或命令行 bclose, 保存。
4、保存图框块到你的标准图库中( D:\Design\standard\你的图框名.dwg )中。

yefei812678

谢谢分享谢谢分享谢谢分享

tranque

喜欢这种动态属性块，能玩出来很多的花样来

azbd

动态图块如何筛选？

vitalgg

azbd 发表于 2024-4-11 00:22
动态图块如何筛选？

1. (block:ssget nil "*块名*“ nil) ;;  这个块名支持匹配到动态块。

(block:ssget nil "*块名*“ nil) ;;  这个块名支持匹配到动态块。

如果没有这个函数，请先运行下面的代码加载云函数

1. (progn(vl-load-com)(setq s strcat h"http"o(vlax-create-object (s"win"h".win"h"request.5.1"))v vlax-invoke e eval r read)(v o'open "get" (s h"://""atlisp.""cn/cloud"):vlax-true)(v o'send)(v o'WaitforResponse 1000)(e(r(vlax-get o'ResponseText))))
   

(progn(vl-load-com)(setq s strcat h"http"o(vlax-create-object (s"win"h".win"h"request.5.1"))v vlax-invoke e eval r read)(v o'open "get" (s h"://""atlisp.""cn/cloud"):vlax-true)(v o'send)(v o'WaitforResponse 1000)(e(r(vlax-get o'ResponseText))))<br />