弗拉不会得到描述工作吗?
编辑:拍摄。你是对的。vla获取评论
- (defun c:test ()
- (setq blks (vla-get-Blocks (vla-get-ActiveDocument (vlax-get-acad-object))))
- (setq ent (vlax-ename->vla-object (Car (entsel))))
- (print (vla-get-comments (vla-item Blks (vla-get-effectivename ent))))
- (princ)
- )
愚蠢的我。。。 |