Описание команды


prgrs

Создание и изменение окна прогресса.

prgrs=Mode

Параметры:

ModeРежим.
  x||Title|Text(|Left|Top|Width|Height) - создаёт окно прогресса.
    Title - заголовок окна.
    Text - текст окна.
    Left - [необязательный] координата левого края.
    Top - [необязательный] координата верхнего края.
    Width - [необязательный] ширина окна.
    Height - [необязательный] высота окна.
  Number|Max(||Text) - изменяет окно прогресса.
    Number - текущий номер цикла.
    Max - максимальное число цикла.
    Text [необязательный] - новый текст окна.
  -1 - закрывает окно прогресса.

Примечания:

Команда создана по просьбе пользователей для использования прогресса в других программах, к примеру в vbs скриптах:

'===========================================================================
' Пример вызова прогресса с помощью утилиты в VBScripting
'===========================================================================
' Путь до утилиты. Измените, если он отличается
TCIMG = "%COMMANDER_PATH%\TCIMG.exe"

' вызов окна прогресса
RunTCIMG "prgrs=x||Заголовок|Текст окна|5|5|250|75", False

For i = 1 To 50
  ' установка значения полосе прогресса
  RunTCIMG "prgrs=" & i & "|" & 50, True
Next

' закрытия окна прогресса
RunTCIMG "prgrs=-1", True
' запуск утилиты с параметрами

Sub RunTCIMG(Param,WaitOnReturn)
  CreateObject("WScript.Shell").Run Chr(34) & TCIMG & Chr(34) & " " & Replace(Param, " ", "~~"), 1, WaitOnReturn
End Sub

См. также:

beepss, delvlc, dilog, fontx, formt, imgpr, infbx, infht, itray, movlc, posts, shape, sndps, style, stylp, tcgup, tslit, voice, watch, winls, wnamp

Примеры:
 Как создать кнопку?

prgrs=-1 ;; закрыть окно ранее созданного окна прогресс

prgrs=50|100 ;; изменить величину полосы созданного окна прогресса

prgrs=50|100||Текст~~окна~~изменился ;; изменить величину полосы созданного окна прогресса

prgrs=x||Заголовок|Текст~~окна|5|5|250|75 ;; создать окно прогресса


© Аверин Андрей для Total Commander Image  Averin-And@yandex.ru