图框属性编号源码和经验分享

飒路紫 · 发表于 2020-10-9 12:19

本帖最后由飒路紫于 2020-10-28 10:05 编辑

之前在插件版块分享了图框属性编号的插件，现在整理分享经验及源码；

http://bbs.mjtd.com/thread-180224-1-1.html

=========之前用OPENDCL做的图框“属性编号”插件源码分享==========
一、主要功能
1）、递增编号：

属性递增级 — 每步1级；
自定义连接符“@”，“@数值”项为空时，不包含连接符；文本框内“@”符号位置自定义，“@”符号不可删除；
“文本”内“@”后应填写大写或小写数字；

2）、固定文本：

功能同“递增编号”，只需在“文本”内填写固定文本即可；

3）、序列文本：

选取的文本应为单行文本；通过选取已有的单行文本序列，将其当做属性值填入到所选的图框；
注意图框及文本的数量要一致；

4）、提取属性：

将已选择的图框属性输出为文本，可选则数位为单行或多行，可自定义输出字高和行距；

5）、字段功能：

序列文本及提取属性两项，可选则字段功能，设置了字段功能，填入或输出的文本与图框属性相互关联；

6）、外部参照：

序列文本及提取属性两项，可选则字段功能，设置了字段功能，填入或输出的文本与图框属性相互关联；

7）、附加图框：
8）、辅助线：9）、重启清空：
链接：https://pan.baidu.com/s/1csSxG0mFR91joCJ990CB5g
提取码：kr9v
OPENDCL文件下载地址，有反应压缩包问题的自行下载

etoxp · 发表于 2021-12-22 21:11

也可以用PL线来给定顺序

daziduan · 发表于 2021-12-22 15:45

@飒路紫
http://bbs.mjtd.com/forum.php?mo ... &fromuid=203481
在lisp代码中
;==========================================按照不同修改类型处理文本=========================================
  (setq str1 (dcl-Control-GetText sxbh/numatt/Text));dcl中输入文本的值
;;;  (setq str2 "-")
  (setq str3 (dcl-Control-GetText sxbh/numatt/number));dcl中输入的数字
  (setq m 0)
(cond
   ((= (dcl-Control-GetValue sxbh/numatt/OptionButton5) 1);当选择递增编号
(if (= (type (read str3)) 'INT)
   (progn
      (repeat (length lst)
      (setq a (nth m lst))
      (setq data1 (entget (cdar a)))
      (setq data1_bj (assoc 1 data1))

在此处(print data1)显示如下：
((-1 . <图元名: 7ffffb0f670>) (0 . "INSERT") (330 . <图元名: 7ffffb0c820>) (5 . "407") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbBlockReference") (66 . 1) (2 . "tu1") (10 320398.0 -161402.0 0.0) (41 . 1.0) (42 . 1.0) (43 . 1.0) (50 . 0.0) (70 . 0) (71 . 0) (44 . 0.0) (45 . 0.0) (210 0.0 0.0 1.0))

(setq data1_bj (assoc 1 data1))不能正确获得“data_bj”没有“1”值

是不是此2.0版本的获取tag的方式不合适？  请指教！

飒路紫 · 发表于 2020-10-9 15:34

烟盒迷唇发表于 2020-10-9 15:00
现在图片都显示不了，看起来非常麻烦

源码的东西肯定不能拿来就用，有关路径等乱七八糟的还是需要根据实际情况自己来设置。好多人反馈各种小问题，所以干脆源码自助吧

烟盒迷唇 · 发表于 2020-10-9 15:00

现在图片都显示不了，看起来非常麻烦

oistre · 发表于 2020-10-9 17:08

骗钱的？ODCL压缩包下载后打不开

飒路紫 · 发表于 2020-10-9 17:26

烟盒迷唇发表于 2020-10-9 15:00
现在图片都显示不了，看起来非常麻烦

哦，你说论坛啊，我也搞不懂，不知道为啥图片不显示了

飒路紫 · 发表于 2020-10-9 17:26

oistre 发表于 2020-10-9 17:08
骗钱的？ODCL压缩包下载后打不开

你安装OPENDCL了吗？没安装肯定打不开啊

G〆h · 发表于 2020-10-9 17:32

不能用啊，为什么不发个能直接用的啊？

飒路紫 · 发表于 2020-10-9 20:50

G〆h 发表于 2020-10-9 17:32
不能用啊，为什么不发个能直接用的啊？

之前的帖子发过了，但是测试环境有限，个别问题可以自己源码改一改。看之前的帖子吧

飒路紫 · 发表于 2020-10-9 20:51

建议之前用过这个程序的下载，因为这个不能直接用，要调试OPENDCL，之前发的是打包好的。

lxl217114 · 发表于 2020-10-10 10:04

oistre 发表于 2020-10-9 17:08
骗钱的？ODCL压缩包下载后打不开

真别这么揣测楼主，真是个无私奉献的人，如果你看过他的另外一个帖子就知道需要Oendcl配合

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

[源码] 图框属性编号源码和经验分享

本帖子中包含更多资源

评分

本帖子中包含更多资源

点评