(setq mspace (vla-get-ModelSpace (vla-get-ActiveDocument (vlax-get-acad-object)))) (vla-addmtext mspace (vlax-3d-point insert_pt) 0 "新建MTEXT文本") (command "mtext" insert_pt "j" "mc" "h" 5 insert_pt "新建MTEXT文本" "")
我想用前面两句代替最后一句。问题是,用vla-addmtext 时对正方式和文本高度应该怎么设置? |