Verwendung einer ProgressBar

[ManniSt]

Hi,

ich muss eine ganze Rehe von Nummern crunchen. Die beginnen bei X und enden bei Y. Das kann gfls. echt lange dauern. Nun habe ich da eine TProgressBar eingebaut:

ProgressBar.Min := X;
Progressbar.Max := Y;
ProgressBar.Step := 1;

for X := 1 to Y do
begin
irgendwas...
ProgressBar.StepIt;
ProgressBar.Update;
end;

Funktioniert soweit richtig gut. NUR...die Bar verzögert das Numbercruching um ganze Größenordnungen. Wie kann man das Teil beschleunigen oder gibt es eine schnellere Möglichkeit?

Manni