当ProgressBar的Smooth设为False时,
进度条的每个方块的宽度怎么设置,谢谢?

解决方案 »

  1.   

    ProgressBar1.min:=0;
    ProgressBar1.Max:=100;设定进度(方块)时用
    ProgressBar1.Position:=I;
      

  2.   

    不好意思忘了加上
    ProgressBar1.Position:=I;
    ProgressBar1.Update;
      

  3.   

    ProgressBar1.min:=0;
    ProgressBar1.Max:=100;
    ProgressBar1.Position:=0;
    ProgressBar1.Step := 10; 
    ProgressBar1.StepIt; //每次增加10個方塊
      

  4.   

    ProgressBar1.min:=0;
    ProgressBar1.Max:=100;
    ProgressBar1.Position:=0;
    ProgressBar1.Step := 10; 
    ProgressBar1.StepIt;
      

  5.   

    不行因为那个是系统决定的。要不你可以用smooth楼上的其实是没有看明白。
      

  6.   

    把max扩大或缩小N倍,调用时候再乘以N或者除以N。step仍为1。
      

  7.   

    darkliu(钢铁工人甲):
    能否给个例子,我没有试成功!
      

  8.   

    那是因为他的方法根本就是错的。你可以看看TProgressBar的源代码就知道了。
      

  9.   

    怎么得到TProgressBar的源代码,谢谢!
      

  10.   

    请在Delphi安装目录里寻找。有个SRC目录