lucumu 发表于 2004-9-30 09:01:00

autoLisp中怎样改变ddtext输入的文字???

autoLisp中怎样改变ddtext输入的文字???


如何取得文字内容和如何改变文字的内容?????

lanyuling 发表于 2004-9-30 16:56:00

Command: (entget (car (entsel)))


Select object: ((-1 . &lt;Entity name: 40202e60&gt;) (0 . "TEXT") (330 . &lt;Entity <BR>name: 40202cf8&gt;) (5 . "4C") (100 . "AcDbEntity") (67 . 0) (410 . "Model") (8 . <BR>"0") (100 . "AcDbText") (10 -43.995 969.714 0.0) (40 . 500.0) (1 . "设计依据") <BR>(50 . 0.0) (41 . 0.8) (51 . 0.0) (7 . "2") (71 . 0) (72 . 0) (11 0.0 0.0 0.0) <BR>(210 0.0 0.0 1.0) (100 . "AcDbText") (73 . 0))<BR>看到上面有没有一个“(1 . "设计依据") ”


然后再用LSP编写，更改就可以了！！！
页: [1]
查看完整版本: autoLisp中怎样改变ddtext输入的文字???