VL-string-subst (특정 문자 교체)

Auto CAD/lisp|2019. 4. 4. 12:25

(vl-string-subst new-str pattern string [start-pos])

 

 new-str : 변경할 문자

 pattern : 변경되어질 문자

 string : 원본글자

 [start-pos] : 대괄호 역시 생략가능하구 아래 vl-string-search 와 같습니다.^^

 

리턴값 : 변경후 문자.^^

example

 

_$ (vl-string-subst "h" "a" "hahahahah")
"hhhahahah"

 

( a 가 여러개가 있지만 첫번째 a 만 h 로 변경이 됩니다)

( 그러므로 대체를 다 할려면

  (setq sting "aaaaaa")

  (while (/= (vl-string-search "a" string) nil) 

  (setq stirng (vl-string-subst "h" "a" string))) 이런식의 응용이 가능합니다. 있으면 바꾸라~

_$ (vl-string-subst "h" "A" "hahahahah")
"hahahahah"

(대소문자 구별을 합니다.) 


_$ (vl-string-subst "h" "k" "hahahahah")
"hahahahah"

(해당 pattern 이 없으면 nil을 응답하는게 아니라 string 을 응답하네여.^^)  


_$ (vl-string-subst "h" "a" "hahahahah" 4)
"hahahhhah" 

(뒤에 4 가 붙어서 0 1 2 3 4 즉 5번째 글자뒤에서 첫번째 a 가 h 로 변경이 되네여.^^)  

 

 

 

출처 : 아키모아 행복한 하루 http://cafe.daum.net/archimore/IP9e/23

 

 

 

 

 

댓글()