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

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

本帖最后由 飒路紫 于 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:26

也可以用PL线来给定顺序

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

@飒路紫
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=182209&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:03

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

真别这么揣测楼主，真是个无私奉献的人，如果你看过他的另外一个帖子就知道需要Oendcl配合
页: [1] 2 3 4
查看完整版本: 图框属性编号源码和经验分享