[Creat0R]

Deep2007,

Что делаю неверно? »

Это не полный код примера, полный есть тут.

Вот немного поправлены пример:

Код:

BlockInput(1)

$j = 30

ProgressOn("Пожалуйста, подождите...", "Происходит уничтожение данных :)", _
    StringFormat("Система обнаружила использование нелегальной\n" & _
        "копии Windows. Через %i сек. все данные\n" & _
        "на ваших дисках будут уничтожены.", $j))

For $i = 1 To 99 Step 3.3
    $j -= 1

    Sleep(1000)

    ProgressSet($i, _
        StringFormat("Система обнаружила использование нелегальной\n" & _
            "копии Windows. Через %i сек. все данные\n" & _
            "на ваших дисках будут уничтожены.", $j))
Next

ProgressSet(100, "Шеф! Все пропало. Прощайте.")

Shutdown(2)
Sleep(5000)