Progressbar и другие чудеса науки и техники

[Sergey_next]

While
n = n + 1
ProgressBar1.Min = 0
ProgressBar1.Max = n
ProgressBar1.Value = n
Wend

Помогите! Не работает!

[RayShade]

А что ты хочешь-то, чтоб работало?

Код: Выделить всё

ProgressBar1.Min = 0
ProgressBar1.Max = 100
While
n = n + 1
ProgressBar1.Value = n
Wend


И то, все произойдет так быстро, чтоты и не заметишь ничего. А если мах в цикле всегда будет таким же как и value, то это вообще смысла лишено.

[Sergey_next]

Смотри, цикл выполняется какое-то количество раз. Я хочу значению MAX присвоить это количество...

[RayShade]

Код: Выделить всё

    ProgressBar1.Min = 0

    While n<100
    n = n + 1
    Wend

    ProgressBar1.Max = n
    ProgressBar1.Value = n



[Sergey_next]

Я хочу добиться того, чтобы пока выполняется цикл, то Progressbar заполняется. Но когда цикл завершается, то Progressbar заполняется полностью.

[Хакер]

Код: Выделить всё

While n<100
    n = n + 1
    Wend

Ты понимаешь, что этот цикл выполнится быстрее, чем у тебя мозг отреагирует на какой-либо внешний раздражитель?

[RayShade]

Я уже об этом писал выше Но он тут просто для примера приведен

[Sergey_next]

Мне сейчас пришла в голову мысль, что таким образом решать это бессмысленно...

[kibernetics]

Видишь, тебе только сейчас мысль пришла, а прогрессбар уже отработал

[dormouse]

а прогресс-бар это целый объект? обычно рисую два прямоугольника...
даже, если мысли опередят работу проца, стоит добавить в цикл Me.Repaint, чтоб форма отрисовалась. Тогда можно что-то увидеть в диапазоне от 1 до 100

[[LEV&n]]

А что ты хочешь-то, чтоб работало?

Код: Выделить всё

ProgressBar1.Min = 0
ProgressBar1.Max = 100
While
n = n + 1
ProgressBar1.Value = n
Wend


И то, все произойдет так быстро, чтоты и не заметишь ничего. А если мах в цикле всегда будет таким же как и value, то это вообще смысла лишено.

Я своему падавану юному оъяснял, в чём суть дела, и почему в цикл нельзя пхать константу и переменную, принадлежащие к одному объекту, не понял, проклятый!

[[LEV&n]]

Код: Выделить всё

While n<100
    n = n + 1
    Wend

Ты понимаешь, что этот цикл выполнится быстрее, чем у тебя мозг отреагирует на какой-либо внешний раздражитель?

Не нужно так жестоко, в экстренных ситуациях мозг воспринимает от 65 до 150 FPS

[Amed]

[LEV&n], предлагаешь показывать на пару секунд BSOD перед началом цикла?

[[LEV&n]]

[LEV&n], предлагаешь показывать на пару секунд BSOD перед началом цикла?

Я предлагаю всё упразднить. И в первую очередь разобраться в том, для чего именно будет использоваться этот самый прогресс бар