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