批处理之家 - Powered by Discuz! Board

标题: 进度条绘制工具 [打印本页]

作者: went 时间: 2021-8-22 17:03 标题: 进度条绘制工具

本帖最后由 went 于 2021-8-24 10:32 编辑

使用方法见帮助信息

显示进度条.

progress -t:string -p1:int -p2:int -pen:hex -penw:int -brush:hex { < -ps:int -pt:string> | <-r1:int -r2:int> } 

  -t      进度条类型           [rect|circle]
  -p1     当前进度             [10进制数]
  -p2     总进度               [10进制数]
  -pen    画笔颜色             [大写16进制数]
  -penw   画笔宽度             [10进制数]
  -brush  填充颜色             [大写16进制数]
  -ps     矩形进度条高(宽)度   [10进制数]
  -pt     矩形进度条显示方式   [hor|ver]
  -r1     圆形进度条外半径     [10进制数]
  -r2     圆形进度条内半径     [10进制数]

  progress -t:rect -p1:40 -p2:100 -pen:FF00 -penw:2 -brush:FF0000 -ps:30 -pt:hor
      进度为40%的蓝色垂直水平进度条,边框为红色

  progress -t:circle  -p1:90 -p2:360 -pen:FF0000 -penw:1 -brush:FF0000 -r1:50 -r2:35
      进度为1/4的蓝色圆环进度条,蓝色边框,外圆半径50,内圆半径35

  progress -t:circle  -p1:45 -p2:360 -pen:0 -penw:1 -brush:FF0000 -r1:50 -r2:0
      进度为1/8的蓝色饼状进度条,无边框,半径为50
复制代码

使用举例:

@echo off & cd /d "%~dp0"
REM color f0
for /l %%i in (0,3,360) do (
	REM echo %%i
	REM 水平进度条
	progress -t:rect    -p1:%%i -p2:360 -pen:FF00 	-penw:2 -brush:FF0000 -ps:10 -pt:hor
	REM 垂直进度条
	progress -t:rect    -p1:%%i -p2:360 -pen:FF00 	-penw:2 -brush:FF0000 -ps:10 -pt:ver
	REM 圆环进度条
	REM progress -t:circle  -p1:%%i -p2:360 -pen:0	   -penw:1 -brush:FF0000 -r1:50 -r2:35
	REM 饼状进度条
	progress -t:circle  -p1:%%i -p2:360 -pen:FF0000      -penw:1 -brush:FF -r1:50 -r2:0
)
pause&exit
复制代码

效率一般,仅当娱乐
exe和源代码这里下载
进度条

作者: went 时间: 2021-8-22 17:19

本帖最后由 went 于 2021-8-22 18:34 编辑

显示设置为非100%缩放率的电脑上可能出现显示不完整的情况,已修复

作者: peterboy666 时间: 2021-8-22 19:10

本帖最后由 peterboy666 于 2021-8-22 22:13 编辑

回報 Bug:

@echo off & cd /d "%~dp0"

for /l %%i in (0,3,360) do (
Progress -t:rect -p1:%%i -p2:360 -pen:FF00 -penw:2 -brush:FF0000 -ps:30 -pt:hor
)

cls
for /l %%i in (0,3,360) do (
Progress -t:rect -p1:%%i -p2:360 -pen:FF00 -penw:2 -brush:FF0000 -ps:30 -pt:ver
)

cls 无效

作者: went 时间: 2021-8-22 20:20

本帖最后由 went 于 2021-8-22 20:22 编辑

回复 3# peterboy666

什么问题http://cdnjson.com/images/2021/08/22/Video_2021-08-22_195025.gif

作者: cmd1152 时间: 2021-8-22 20:46

回复 3# peterboy666

cls换成color 07

作者: peterboy666 时间: 2021-8-22 21:11

本帖最后由 peterboy666 于 2021-8-22 21:14 编辑

回复 peterboy666

什么问题
went 发表于 2021-8-22 20:20

在 Windows XP/7 测试都一样.

看视频

https://cowtransfer.com/s/33ce9d49871640

作者: peterboy666 时间: 2021-8-22 21:14

回复 peterboy666

cls换成color 07
cmd1152 发表于 2021-8-22 20:46

一样没用.

作者: cmd1152 时间: 2021-8-22 21:39

回复 7# peterboy666

搞错了，是

color70&color07
复制代码

作者: peterboy666 时间: 2021-8-22 22:09

回复 peterboy666

搞错了，是
cmd1152 发表于 2021-8-22 21:39

有用,
但还是修一下 BUG 比较好.

作者: peterboy666 时间: 2021-8-22 22:11

本帖最后由 peterboy666 于 2021-8-22 22:15 编辑

再反应一个 BUG

Windiws 7 : 正常
Windows XP : 不正常

看视频
https://cowtransfer.com/s/4ff3704958df49

@echo off & cd /d "%~dp0"

color 70&color 07
for /l %%i in (0,3,360) do (
Progress -t:circle -p1:%%i -p2:360 -pen:0 -penw:1 -brush:FF0000 -r1:50 -r2:35
)

color 70&color 07
for /l %%i in (0,3,360) do (
Progress -t:circle -p1:%%i -p2:360 -pen:FF0000 -penw:1 -brush:FF -r1:50 -r2:0
)

作者: went 时间: 2021-8-23 19:12

链接更新了,只测试了win10

作者: peterboy666 时间: 2021-8-23 19:28

链接更新了,只测试了win10
went 发表于 2021-8-23 19:12

Windows 7 测了一下

更新版:
解决一半.
运行后也是不能 CLS 清除,但若拖动窗口就会清除重绘了,
但是拖动窗口会造成画面闪烁.

前一版:
拖动窗口不会造成画面闪烁,比较稳定,
先用 color 70&color 07 顶着用,
就不更新了.

作者: went 时间: 2021-8-23 19:37

回复 12# peterboy666

你是用来做什么的

作者: peterboy666 时间: 2021-8-23 20:04

回复 peterboy666

你是用来做什么的
went 发表于 2021-8-23 19:37

只是测试.

作者: 遨游天涯 时间: 2023-7-6 21:07

只是测试，测试测试

作者: CrLf 时间: 2023-7-27 23:24

感谢分享，已收录到 http://bcn.bathome.net

欢迎光临批处理之家 (http://bathome.net./)

Powered by Discuz! 7.2