从格式化的MTEXT获得真实的文本的代码

newer · 发表于 2016-12-8 13:42:32

/db_自贡黄明儒_ 发表于 2016-12-8 13:25

得到什么样的字符，贴下。

/db_自贡黄明儒_ · 发表于 2016-12-8 13:49:23

newer 发表于 2016-12-8 13:42

1.rar是测试文件有时得到的是 "钢板 δ10*150*150" ,有时是"钢板 \\U+03b410*150*150",用来计算钢板重量时，后者总是出现错误答案。故想去红色部分

如"钢板 \\U+03b410*150*150"去掉\\U+03b4

/db_自贡黄明儒_ · 发表于 2016-12-8 13:53:48

newer 发表于 2016-12-8 13:42

似乎\\U+后面总是4位

/db_自贡黄明儒_ · 发表于 2016-12-8 15:52:02

终于搞定了

(XD::String:Replace "[\\\\U+0-9a-fA-F]{7}" str "" "")

newer · 发表于 2016-12-8 16:03:51

/db_自贡黄明儒_ 发表于 2016-12-8 15:52

老黄，那把你整理的整个的函数贴上来吧。

/db_自贡黄明儒_ · 发表于 2016-12-8 17:00:54

newer 发表于 2016-12-8 16:03

;;单行文字Text 去格式化
(defun XD::Text:UnFormat (str / m1 match)
  (setq match "%%o|%%O|%%U|%%u|%%140|%%141|%%142|%%143|%%c|%%C|%%d|%%D|%%p|%%P");上下划线、上下标，圆、度、正负
  (setq str (XD::String:Replace match str "" ""))
  (XD::String:Replace "[\\\\U+0-9a-fA-F]{7}" str "" "")
)

cq_qg68 · 发表于 2016-12-12 08:44:35

看不懂啊，差距太大了

newer · 发表于 2016-12-12 09:06:43

cq_qg68 发表于 2016-12-12 08:44

不用看懂，拿回去直接用，函数。想看懂的话，论坛搜索正则表达式

1121443108qaz · 发表于 2018-5-22 20:40:54

好帖，可惜没看懂。

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

[他山之石] 从格式化的MTEXT获得真实的文本的代码