用法
评论
建议
取 消
确 定
(defun layer:off (laylist) "关闭图层\n参数：图层名称表" (setq laylist (mapcar (quote strcase) laylist)) (vlax-for each *lays* (if (member (strcase (vla-get-name each)) laylist) (if (vlax-write-enabled-p each) (vla-put-layeron each :vlax-false))) (vlax-release-object each)))
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 767 个
函数库类别: 53 种
上传记录
刷新
冀公网安备 13050302000400号