用法
评论
建议
取 消
确 定
(defun block:set-dynprop (blk prp val) "设置动态块特性值" (setq prp (strcase prp)) (vl-some (quote (lambda (x) (if (= prp (strcase (vla-get-propertyname x))) (progn (vla-put-value x (vlax-make-variant val (vlax-variant-type (vla-get-value x)))) (cond (val) (t)))))) (vlax-invoke (vlax-ename->vla-object blk) (quote getdynamicblockproperties))))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 772 个
函数库类别: 54 种
上传记录
刷新