请大哥大姐帮忙

孤独客 · 发表于 2004-9-25 21:36:00

怎么用ＶＬＩＳＰ定义一个带属性的快

xyp1964 · 发表于 2004-9-25 21:41:00

可以用wblock命令生成块文件，这样会更简单些。

孤独客 · 发表于 2004-9-26 16:34:00

请问老哥我是一个VLISP初学者怎么用COMMAND使用这个命令呢谢谢

meflying · 发表于 2004-9-26 18:56:00

可以看看帮助文件啊

王咣生 · 发表于 2004-9-26 22:04:00

例子: (vl-load-com) (defun C:AddAttributeBlkRef ( / doc ins blks blkf )
(setq doc (vla-get-ActiveDocument (vlax-get-acad-Object))
mod (vla-get-modelspace doc)
ins (vlax-3d-point '(0 0 0))
blks (vlax-get-property doc 'Blocks)
blkf (vlax-invoke-method blks 'Add ins "NEW_BLK")
)
(setq lineobj (vlax-invoke-method
blkf
'AddLine
(vlax-3d-point '(0 0 0))
(vlax-3d-point '(10 10 0))
)
attrobj (vlax-invoke-method
blkf
'AddAttribute
3.0
acAttributeModeConstant
"MyPrompt"
ins
"MyTag"
"MyValue"
)
)
(setq blkref (vlax-invoke-method mod 'InsertBlock (vlax-3d-point '(100 100 0)) "NEW_BLK" 1 1 1 0))
;;; (vlax-dump-object blkf t)
)

孤独客 · 发表于 2004-10-1 16:06:00

谢谢版主

账号		自动登录	找回密码
密码			注册

请大哥大姐帮忙

回复

本帖子中包含更多资源