taoyi0727 发表于 2019-9-15 13:37:46

怎么在状态栏上增加文字

我用的是海龙工具他上这个是怎么实现的?

菜卷鱼 发表于 2019-9-20 11:25:47

纵横八方 发表于 2019-9-19 19:44
能打个样吗

这是我做的一个反应器，就是每次命令结束或者中断，检测上次是用的什么命令，假如命令是DIM开头的，但是不是DIMSTYLE 就自动恢复图层。

你可以用这个改，每次命令结束之后，检测一下左下角是不是被改了，或者每次使用完命令，你直接改成你要的左下角

这里面是2个反应器 *layerend* *layercancel* ，layerback 是执行程序

(or *layerend*
    (setq *layerend* (vlr-command-reactor
         nil
         '(
         (:VLR-commandEnded . layerback)
          ))))

(or *layercancel*
    (setq *layercancel* (vlr-command-reactor
         nil
         '(
         (:VLR-commandcancelled . layerback)
          ))))

(defun layerback (x1 x2 / A1 A2 )
(setqa1 x1 a2 x2)
(IF (= mm_lay nil)(setq mm_lay (getvar "CLAYER")))
(if (and (wcmatch (CAR a2) "DIM*")(not (wcmatch (CAR a2) "DIMSTYLE*")))(setvar "clayer" mm_lay ))
)

669423907 发表于 2019-9-15 14:11:49

(command "setvar" "modemacro" "Ｆ= $(getvar,filletrad) Ｃ= $(getvar,chamfera)×$(getvar,chamferb)") ;CAD左下角显示

taoyi0727 发表于 2019-9-15 17:02:58

669423907 发表于 2019-9-15 14:11
(command "setvar" "modemacro" "Ｆ= $(getvar,filletrad) Ｃ= $(getvar,chamfera)×$(getvar,chamferb)")...

谢谢!~!~搞了这么久
有这个系统变量我都不知道

纵横八方 发表于 2019-9-15 20:01:15

关键是不能弄成永久的，用到天正的功能 又变回 天正的比例了

shcvip 发表于 2019-9-18 08:48:14

我在2020版本显示的是右下角。

菜卷鱼 发表于 2019-9-19 17:05:02

纵横八方 发表于 2019-9-15 20:01
关键是不能弄成永久的，用到天正的功能 又变回 天正的比例了

弄个反应器啊

纵横八方 发表于 2019-9-19 19:44:39

什么意思，能打个样吗

纵横八方 发表于 2019-9-19 19:44:59

菜卷鱼 发表于 2019-9-19 17:05
弄个反应器啊

能打个样吗

669423907 发表于 2019-9-20 17:12:39

;变量反应器 free-Lancer
(defun blfyq(v1 v2 / s)
(setq s "Ｆ= $(getvar,filletrad) Ｃ= $(getvar,chamfera)×$(getvar,chamferb)") ;CAD左下角显示
(if (/= (getvar'modemacro) s)
    (setvar'modemacro s)
)
(princ)
)
(vlr-editor-reactor
nil
'((:vlr-lispEnded . blfyq)
    (:vlr-lispCancelled . blfyq)
   )
)
页: [1] 2
查看完整版本: 怎么在状态栏上增加文字