ATTRIB对象中多行文字怎么提取字符串？

wyl219

对于属性为单行文字的情况，组码是类似下面的情况
((-1 . <图元名: 7ff647d20510>) (0 . "ATTRIB") (330 . <图元名: 7ff647d20500>) (5 . "8CA9") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "_01补风风管长度") (100 . "AcDbText") (10 1.37569e+006 441835.0 0.0) (40 . 25.0) (1 . "55") (50 . 0.0) (41 . 0.7) (51 . 0.0) (7 . "HVAC") (71 . 0) (72 . 0) (11 0.0 0.0 0.0) (210 0.0 0.0 1.0) (100 . "AcDbAttribute") (280 . 0) (2 . "1") (70 . 0) (73 . 0) (74 . 0) (280 . 1))
直接通过组码1就能提取字符串，但是当属性为多行文字的时候，是下面的情况（之前贴上的是普通的多行文字，更改为attrib了。）

((-1 . <图元名: 7ff6e8107b30>) (0 . "ATTRIB") (330 . <图元名: 7ff6e8107b20>) (5 . "303") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbText") (10 4319.84 4408.88 0.0) (40 . 2.5) (1 . "") (50 . 0.0) (41 . 1.0) (51 . 0.0) (7 . "HVAC") (71 . 0) (72 . 0) (11 4319.84 4411.38 0.0) (210 0.0 0.0 1.0) (100 . "AcDbAttribute") (280 . 0) (2 . "标记") (70 . 0) (73 . 0) (74 . 3) (280 . 1) (71 . 2) (72 . 0) (11 4319.84 4411.38 0.0) (101 . "Embedded Object") (10 4319.84 4411.38 0.0) (40 . 2.5) (41 . 5.98235) (46 . 0.0) (71 . 1) (72 . 5) (1 . "显示") (7 . "HVAC") (210 0.0 0.0 1.0) (11 1.0 0.0 0.0) (42 . 3.25368) (43 . 2.58272) (50 . 0.0) (73 . 1) (44 . 1.0))


有两个1，而且第一个显示的是默认值。
怎么才能取得真正的字符串呢？另外，组码的顺序好像是不确定的吧？

/db_自贡黄明儒_

ATTRIB没有多行文字吧？？？对于块中MTEXT，缩放一下块，它就变成单行文字了。

wyl219

/db_自贡黄明儒_ 发表于 2018-10-20 15:18
ATTRIB没有多行文字吧？？？对于块中MTEXT，缩放一下块，它就变成单行文字了。

有多行文字啊

/db_自贡黄明儒_

wyl219 发表于 2018-10-20 15:52
有多行文字啊

果然高版本有多行，没用过。
老大写过多行文字去格式，你自己找一下。

marting

正常读组码1，

"{\\W1;1234}" 这样的格式的，是多行文本设置了格式的，你处理下就好了，把格式去掉

用 MTEXT 格式 搜索下论坛，有代码

命令: (xd::mtext:unformat "{\\W1;1234}")
"1234"

wyl219

/db_自贡黄明儒_ 发表于 2018-10-20 16:57
果然高版本有多行，没用过。
老大写过多行文字去格式，你自己找一下。

用vla-get-TextString 函数提取到了 谢谢

wyl219

marting 发表于 2018-10-20 23:19
正常读组码1，

"{\\W1;1234}" 这样的格式的，是多行文本设置了格式的，你处理下就好了，把格式去掉

单纯提取1不行的，有两个1，第一个是默认值，第二个才是显示值。最后用vla-get-TextString 提取到了带格式的字符串

wyl219

marting 发表于 2018-10-20 23:19
正常读组码1，

"{\\W1;1234}" 这样的格式的，是多行文本设置了格式的，你处理下就好了，把格式去掉

单纯提取1不行的，有两个1，第一个是默认值，第二个才是显示值。最后用vla-get-TextString 提取到了带格式的字符串

lovezp

特地去帮助文件里查看了一下这个函数XD::Mtext:UnFormat 源码，正则表达式的patten属性长达230个字符串

sicky111

看不懂"{\\W1;1234}"是什么意思

wyl219

sicky111 发表于 2018-10-21 16:41
看不懂"{\\W1;1234}"是什么意思

1234是字符串，前面的是多行文字格式，w1应该是字宽为1。

marting

wyl219 发表于 2018-10-21 00:14
单纯提取1不行的，有两个1，第一个是默认值，第二个才是显示值。最后用vla-get-TextString 提取到了带格 ...

不是告诉你提取1，是提取组码1，然后去掉格式。

wyl219

marting 发表于 2018-10-22 02:53
不是告诉你提取1，是提取组码1，然后去掉格式。

之前贴错了，贴成多行文字了。
((-1 . <图元名: 7ff6e8107b30>) (0 . "ATTRIB") (330 . <图元名: 7ff6e8107b20>) (5 . "303") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . "0") (100 . "AcDbText") (10 4319.84 4408.88 0.0) (40 . 2.5)
(1 . "") (50 . 0.0) (41 . 1.0) (51 . 0.0) (7 . "HVAC") (71 . 0) (72 . 0) (11 4319.84 4411.38 0.0) (210 0.0 0.0 1.0) (100 . "AcDbAttribute") (280 . 0) (2 . "标记") (70 . 0) (73 . 0) (74 . 3) (280 . 1) (71 . 2) (72 . 0) (11 4319.84 4411.38 0.0) (101 . "Embedded Object") (10 4319.84 4411.38 0.0) (40 . 2.5) (41 . 5.98235) (46 . 0.0) (71 . 1) (72 . 5)
(1 . "显示") (7 . "HVAC") (210 0.0 0.0 1.0) (11 1.0 0.0 0.0) (42 . 3.25368) (43 . 2.58272) (50 . 0.0) (73 . 1) (44 . 1.0))
，如果直接用(assoc 1 ename)只能提取到第一个出现的组码1，而实际有效的内容是存放在后面哪个里面的。