Check

SystemProgressMorph example


        'Progress' displayProgressAt: Display center
                from: 0
                to: 1000
                during: [:bar | 0 to: 1000 do: [:i | bar value: i. (Delay  
forMilliseconds: 2) wait]]


Stef
On Sep 18, 2009, at 7:33 PM, Schwab,Wilhelm K wrote:

> Hello all,
>
> Is there a preferred way to produce a progress bar?  The example  
> below seems to work, but is there a better way?  Is there a way to  
> provide a cancel button?
>
> Bill
>
>
>
> [
>       #( 1 2 3 4 5 )
>               do:[ :each |
>                       ( Delay forMilliseconds:500 ) wait.
>               ]
>               displayingProgress:'Gratuitous Progress Bar.'
> ] fork.
>
>
>
> _______________________________________________
> Pharo-project mailing list
> [email protected]
> http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project


_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to