abra-CAD-abra 发表于 2022-7-5 18:34:43

复杂字符串处理

我在一张图纸上有很多文字,格式如下:
 
“B=12 37 54.1 L=……”
 
现在,由于上面的字符串不包含度(%%d)分钟(')和秒(“)符号,我尝试替换空格,如下所示:
 
第一个空间位置:“%%d”
第二个空间位置:“”
第三空间位置:“'”
 
我正在考虑使用Vl字符串搜索、Vl字符串位置和Vl字符串Subst,但空间可能并不总是位于同一位置-Bump!
 
一如既往,我感谢任何指导。
 
干杯

Lee Mac 发表于 2022-7-5 18:49:51

可能类似于:
(defun foo ( s l )
   (if (and l (wcmatch s "* *"))
       (foo (vl-string-subst (car l) " " s) (cdr l))
       s
   )
)或:
(defun foo ( s l )
   (if l (foo (vl-string-subst (car l) " " s) (cdr l)) s)
)或:
示例:
3

rlx 发表于 2022-7-5 19:01:45

很多观众,不,谢谢。我并不认为你们会为此失眠,我也不想变得黏糊糊的,但和往常一样,李非常短小而有效。
 
Gr Rlx

Lee Mac 发表于 2022-7-5 19:16:56

谢谢你rlx。

abra-CAD-abra 发表于 2022-7-5 19:27:28

谢谢李的选择!带大写字母“P”的完美。。。
 
非常感谢。

Lee Mac 发表于 2022-7-5 19:36:04

非常欢迎你abra CAD abra
页: [1]
查看完整版本: 复杂字符串处理