MikeP 发表于 2022-7-6 17:10:56

需要一个可视计时器来绘图

我想要一个计时器什么工作的时间命令一样,但我想能够看到它计数时间。我需要一个显示框,显示多长时间,每个图纸已经打开

ReMark 发表于 2022-7-6 17:18:13

秒表就是不行?你是在试图用一个明显的时间提醒来激怒某人还是激励他们?

ReMark 发表于 2022-7-6 17:22:34

你有没有试过Windows的免费模拟时钟?我知道的两个是ClocX和桌面时钟1.6。我不知道你能否像秒表一样用它们来显示经过的时间。

Lee Mac 发表于 2022-7-6 17:26:13

 
哈哈,这话让我笑了

ReMark 发表于 2022-7-6 17:31:00

李:我只是把自己搞砸了。
 
我打算建议喝一杯(或两杯)。

MikeP 发表于 2022-7-6 17:36:34

不,我希望它在图纸中可见

ReMark 发表于 2022-7-6 17:41:20

您可以尝试搜索AutoCAD lisp例程。现在我想不出还有什么别的了。
 
为什么这如此重要?

borgunit 发表于 2022-7-6 17:48:42

可能只是读取tdindwg并在每次保存图形时向modemacro字符串发送提示(使用reactor)。一个建议。

MikeP 发表于 2022-7-6 17:52:03

 
 
呵呵?????????

Lee Mac 发表于 2022-7-6 18:00:52

好主意Borgunit,
 
Mike,MODEMACRO函数将在屏幕底部的命令行下面显示一个文本字符串-(要看到这一点,只需在命令行中键入MODEMACRO并将其设置为您选择的一些文本)。
 
“tdindwg”系统变量将跟踪图形已打开的时间,因此,我相信Borgunit建议您使用反应器,指示CAD在用户每次点击save时以MODEMACRO字符串显示tdindwg的某些格式。(或者您可以将其指定为“重画”?)-你的选择。
 
我不太擅长反应堆,但Lisp程序可能是这样的:
 

(defun c:timer (/ t1 h1 h1r m1 m1r str)
   (setvar "cmdecho" 0)
   (setq t1 (getvar "tdindwg"))
   (setq t1 (* t1 86400))
   (setq h1 (fix (/ t1 3600)))
   (setq h1r (rem t1 3600))
   (setq m1 (fix (/ h1r 60)))
   (setq m1r (fix (rem h1r 60)))
   (setq str (strcat "Drawing Time: "   
   (itoa h1) "hrs "
   (itoa m1) "mins "
   (itoa m1r) "secs.")
   )
   (command "MODEMACRO" str)
   (setvar "cmdecho" 1)
   (princ)
)
(c:timer)
页: [1] 2
查看完整版本: 需要一个可视计时器来绘图