用法
评论
建议
取 消
确 定
(defun group:groups-to-objlist (/ i obj-g) "将编组集转为编组对象列表." (setq i 0) (setq obj-g (quote nil)) (while (< i (vla-get-count *grps*)) (setq obj-g (cons (vla-item *grps* i) obj-g)) (setq i (1+ i))) obj-g)
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新