求一个锁定系统变量“HIGHLIGHT”的数值为“1”的代码。

604832184 · 发表于 2018-10-10 20:38

xhlicaofen · 发表于 2018-10-10 20:42

(setvar "HIGHLIGHT" 1)

mikewolf2k · 发表于 2018-10-11 09:11

只要你能改，就无法锁定，不能禁止别人改。在每次你需要这个变量之前，强行设置一下。

604832184 · 发表于 2018-10-11 15:59

mikewolf2k 发表于 2018-10-11 09:11
只要你能改，就无法锁定，不能禁止别人改。在每次你需要这个变量之前，强行设置一下。

我用飞诗的平法移动的时候，飞诗就会给我改了，每用一次改一次，很麻烦的，我就想写个锁定变量的LSP文件来是它自己变成1

mikewolf2k · 发表于 2018-10-11 16:25

既然人家改了，就说明人家需要改，不改就不能运行。lsp执行完了就结束了，不会贮存内存持续改。要么你可以跟开发者提建议，程序执行完后恢复原值。要么自己在自己的程序前面修改为自己需要的值，满足自己程序的需要（跟所谓的飞诗做法一样）。

pzweng · 发表于 2018-10-12 12:47

(or *sysvarchanged* (setq *sysvarchanged* (vlr-sysvar-reactor nil '((:vlr-sysvarchanged . sysvarchanged_do)))))
(defun sysvarchanged_do (a b)
  (if (and (= "HIGHLIGHT" (car b)) (/= (getvar (car b)) 1))
(setvar 'highlight 1)
  )
  (princ)
)

账号		自动登录	找回密码
密码			注册

[提问] 求一个锁定系统变量“HIGHLIGHT”的数值为“1”的代码。