R tkProgressBar 通过 Tk 的进度条

说明

放置一个 Tk 进度条小部件。

用法

tkProgressBar(title = "R progress bar", label = "",
              min = 0, max = 1, initial = 0, width = 300)

getTkProgressBar(pb)
setTkProgressBar(pb, value, title = NULL, label = NULL)
## S3 method for class 'tkProgressBar'
close(con, ...)

参数

title, label	字符串，分别给出窗口标题和对话框上的标签。
min, max	进度条极值的(有限)数值。
initial, value	进度条的初始值或新值。
width	进度条的宽度(以像素为单位)：对话框将宽 40 像素(加上框架)。
pb, con	类 "tkProgressBar" 的对象。
...	为了与通用一致。

细节

tkProgressBar 将显示一个包含标签和进度条的小部件。

setTkProgessBar 将更新该值，对于非 NULL 值，将更新标题和标签(前提是创建小部件时有一个)。 value 的缺失 ( NA ) 和超出范围的值将被(默默地)忽略。

完成后进度条应为 close d。

这将使用ttk::progressbarTk 版本 8.5 或更高版本的小部件，否则RBWidget 的副本progressbar.

值

对于 tkProgressBar 类 "tkProgressBar" 的对象。

对于 getTkProgressBar 和 setTkProgressBar ，给出前一个值的长度为 1 的数值向量(对于 setTkProgressBar 不可见)。

例子

pb <- tkProgressBar("test progress bar", "Some information in %",
                    0, 100, 50)
Sys.sleep(0.5)
u <- c(0, sort(runif(20, 0, 100)), 100)
for(i in u) {
    Sys.sleep(0.1)
    info <- sprintf("%d%% done", round(i))
    setTkProgressBar(pb, i, sprintf("test (%s)", info), info)
}
Sys.sleep(5)
close(pb)

也可以看看

txtProgressBar