我正在尝试读取和编辑字段的链接,我使用以下代码:
- (defun c:testar ( / a e o s x texto tipodepeca z y obj)
- (if (setq s (ssget "_:L" '((0 . "TEXT")) ))
- (repeat (setq i (sslength s))
- (setq e (ssname s (setq i (1- i)))
- x (entget e)
- obj (vlax-ename->vla-object e) ;define object
- a (vla-get-textstring obj) ;assign the object textstring to variable a
- )
-
- (prin1 a)
- (vla-put-textstring obj "%<\AcExpr (Table(%<\_ObjId 8796083039968>%).E6) \f ""%lu2%pr2>%")
-
- )
- )
- (princ)
- )
第一个问题是,当我使用vla get textstring时,代码检索的不是链接,而是静态字段显示的文字文本或值。
第二个问题是,vla put textstring完全用“”中的内容替换内容。如果我有“hi”,它会在文本中放置hi,删除任何类型的字段。我做错了什么? |