用法
评论
建议
取 消
确 定
(defun vectra:make-setenv (vars / rv) (setq rv (list $addnew-layer $addnew-color $addnew-linetype $addnew-lineweight $addnew-textstyle $addnew-block-base)) (vectra:set-symbol-notnull (quote $addnew-layer) (car vars)) (vectra:set-symbol-notnull (quote $addnew-color) (cadr vars)) (vectra:set-symbol-notnull (quote $addnew-linetype) (caddr vars)) (vectra:set-symbol-notnull (quote $addnew-lineweight) (cadddr vars)) (vectra:set-symbol-notnull (quote $addnew-textstyle) (car (cddddr vars))) (vectra:set-symbol-notnull (quote $addnew-block-base) (cadr (cddddr vars))) rv)
函数库使用说明
应用包
技术支持
统计信息
函数库规模: 733 个
函数库类别: 51 种
上传记录
刷新
冀公网安备 13050302000400号