arcers 发表于 2019-5-2 17:38:18

(setvar "taskbar" 1)→AutoCAD 变量设置被拒绝: "taskbar" 1

命令行执行：(setvar "taskbar" 1)
命令行提示：AutoCAD 变量设置被拒绝: "taskbar" 1

为什么被拒绝？

wen1235 发表于 2019-5-6 15:54:17

;;; 方法3 改一下 没问题的
(setq ztl 0)
(defun c:test () (if (= ztl 0) (progn (command "taskbar" "1")(setq ztl 1))(progn (command "taskbar" "0")(setq ztl 0))))

永不言弃 发表于 2019-5-3 17:24:22

(command "taskbar" "1")

arcers 发表于 2019-5-3 23:11:00

本帖最后由 arcers 于 2019-5-4 09:09 编辑

永不言弃 发表于 2019-5-3 17:24
(command "taskbar" "1")
;;; 状态栏图标循环切换



;;; 方法1
(defun c:tbqh()(if (= (getvar "taskbar") 0) (setvar "taskbar" 1) ((setvar "taskbar" 0)) )

;;; 方法2
(defun c:tbqh()(if (= (getvar "taskbar") 0) (command "taskbar" "1") (command "taskbar" "0")) )

;;; 方法3
(setq ztl 0)
(defun c:tbqh()(if (= ztl 0) ((command "taskbar" "1")(setq ztl 1))( (command "taskbar" "0")(setq ztl 0))))

;;; 方法4
(setq ztl 0)
(defun c:tb1()(command "taskbar" "1")(setq ztl 1))
(defun c:tb0()(command "taskbar" "0")(setq ztl 0))
(defun c:tbqh()(if (= ztl 0) (c:tb1)( c:tb0)))

static/image/hrline/1.gif

方法1，命令行提示：AutoCAD 变量设置被拒绝: "taskbar" 1
方法2，仅执行 (command "taskbar" "1")，不执行 (command "taskbar" "0")
方法3，实现状态栏图标循环切换，命令行提示：no function definition: nil
方法4，实现状态栏图标循环切换，命令行不提示异常；但方法比较笨，怎么简化？










永不言弃 发表于 2019-5-4 16:25:48

(defun c:tt()
(setvar "CMDECHO" 1)
(command "taskbar" "")
(setq str (getvar "lastprompt"))
(if (= (getvar "lastprompt") "输入 TaskBar 的新值 <1>:" )
    (command "taskbar" "0")
    (command "taskbar" "1")
    )
)

arcers 发表于 2019-5-5 10:33:20

永不言弃 发表于 2019-5-4 16:25


好像不行！

e2002 发表于 2019-5-6 15:21:29

这个确实很特殊，从诞生到现在都是这样。
页: [1]
查看完整版本: (setvar "taskbar" 1)→AutoCAD 变量设置被拒绝: "taskbar" 1