In the base image Smalltalk allClasses do:[:aClass| (Delay forMilliseconds: 1) wait] displayingProgress:[:aClass| 'Processing ', aClass name].
Phil On Sun, Feb 5, 2017 at 7:16 PM, Henrik Nergaard <[email protected]> wrote: > http://smalltalkhub.com/#!/~Latsabben/GafletFremgangFremviser > > --------------------- > | ston file| > > ston := (1 to: 30) flatCollect: [:ix |STON toStringPretty: Smalltalk > allClasses]. > file := (FileStream fileNamed: 'file.ston'). > > ston whileDisplayingProgress > action: [ :stream | file nextPutAll: stream ] whenDone: [ file > close ]; > open; > fillOwner > --------------------- > > Best regards, > Henrik > > -----Opprinnelig melding----- > Fra: Pharo-dev [mailto:[email protected]] På vegne av > Yuriy Tymchuk > Sendt: 05 February 2017 16:56 > Til: Pharo Development List <[email protected]> > Emne: [Pharo-dev] How can I create a trivial "spinner" etc, to see if > image is busy? > > Hi all, > > is there an easy was to do some thing that is constantly changing? so if > my image freezes (to export a 1gb ston file for example) I can see when > it’s done. Or maybe there is a way to send a mac notification from Pharo? > > Cheers. > Uko >
