ProgressBar

[maksim_serg]

как правильно изменять значения ProgressBar? Использую такой подход:

PBMAX=...
ProgressBar.min=0
ProgressBar.max=PBMAX
if ... then
...
ProgressBar.value=ProgressBar.value+1
end if
...
if ... then
...
ProgressBar.value=ProgressBar.value+1
end if
if ... then
...
ProgressBar.value=ProgressBar.value+1
end if

в результате показываются только первое и последнее значение, без промежуточных.
Заранее благодарен!