使用进度条的目的

自贡黄明儒 · 发表于 2022-5-27 10:39:37

本帖最后由自贡黄明儒于 2022-9-13 17:08 编辑

使用进度条的目的，我认为主要是循环中，让使用者看到没有死机
今后循环中使用(princ(getvar "Millisecs")),也许就简单了。

(defun C:w2 ()
  (while T
(princ(strcat "\r  " (VL-PRINC-TO-STRING(getvar "Millisecs"))))
  )
  (princ)
)
。。。。
后续：以前有人讨论过，5楼vectra是正解。我忘了，随手发的。

;;(startapp "cmd.exe /c del/f D:\\1.txt")正确写法
(startapp "cmd.exe /c del/f D://1.txt")可以在循环中不断弹出，表示程序还在运行，并非死机。

伪书虫86 · 发表于 2022-5-27 14:38:28

都没查到"Millisecs"是个什么东西么，如果每个循环都显示，是会影响效率，关键显示一会儿，后面的就卡在那儿显示不出来了，直到结束

vectra · 发表于 2022-5-27 11:05:01

会严重影响循环效率。。

自贡黄明儒 · 发表于 2022-5-27 12:02:10

vectra 发表于 2022-5-27 11:05
会严重影响循环效率。。

系统函数，不会太费时间吧。

vectra · 发表于 2022-5-27 14:49:15

这个问题是无解的因为循环起来就不会更新显示了也就失去了提示进度的意义目前只找到通过对话框来提示进度的办法

自贡黄明儒 · 发表于 2022-5-27 15:08:44

本帖最后由自贡黄明儒于 2022-5-27 15:11 编辑

vectra 发表于 2022-5-27 14:49
这个问题是无解的因为循环起来就不会更新显示了也就失去了提示进度的意义目前只找到通过对话框来提示进 ...

好像是这么回事情。我也是突然想起，随便说说。

菜卷鱼 · 发表于 2022-5-27 17:53:01

如果转圈圈了，任何东西都会停止更新，直到转完圈圈

muwind · 发表于 2022-5-27 23:25:54

显示出来很费时间的

XPG · 发表于 2022-5-28 18:15:51

不明觉厉。。

masterlong · 发表于 2022-5-28 20:18:28

个人观点
搞进度条只会适得其反
影响速度还是其次
普通人见到进度条不动了
第一反应不去按ESC的有几个？

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

[讨论] 使用进度条的目的

浏览过的版块