[求助]程序中对于多行文字怎么处理?

gyxzzza

我在写程序的时候需要访问某些多行文字,并要把它用单行文字 打印出来,结果发现对于好多有格式的多行文字不管用,例如:{\fSimSun|b0|i0|c134|p2;17#9F}里面的控制字符都是不需要的,怎么才能方便的得到自己需要的内容呢?

(vl-load-com)
(setq *ModelSpace*
       (vla-get-ModelSpace
  (vla-get-ActiveDocument
    (vlax-get-Acad-Object)
  )
       )
)
(defun c:cltj ()
  (setq zongbiao nil)
  (setq jihe (ssget))
  (setq a (ssname jihe 0))
  (setq a (entget a))
  (setq atype (cdr (nth 1 a)))
  (setq aa (vlax-ename->vla-object (ssname jihe 0)))

  (If (= "MTEXT" atype)
     (setq String(vla-get-TextString aa))

   
   

  )

  (vla-Addtext
    *ModelSpace*
    String
    (vlax-3d-point (setq p1 (getpoint "\n请选择位置:")))
    2
  )