Lt Dan's l 发表于 2022-7-6 10:05:19

convert string "10'-1 1/4

I know of a long way to do it (mainly substr and vl-string-position) but wanted to see if there was a better way... any thoughts?

Guest kruuger 发表于 2022-7-6 10:36:28

maybe this:

(distof "10'-1 1/4\"" (if (vl-string-search "\"" "10'-1 1/4\"") 3 2 ))see also http://www.cadtutor.net/forum/showthread.php?52730-Spiderdim-lisp&highlight=spiderdim -> function (kr:CheckFormat XXX)
kruuger

pBe 发表于 2022-7-6 11:09:27

 
 

(distof "10'-1 1/4"4)
 
 
string to string:

(rtos (DISTOF "10'-1 1/4"4) 2 2)
 
 
页: [1]
查看完整版本: convert string "10'-1 1/4