ProgressBar1.Max:=5000;//最大值 progressbar1.Step:=1;//步长 progressbar1.Position:=i;//当前进度位置。 smooth=true;//光滑进度样式。