#
# This file is encoded in (so called) SHIFT-JIS,
# line delimitor is CR.
#
Progress
Goodies for Squeak

Broken English description

Progress
Goodies for VisualWorks 2.5 and VisualWave 1.0
Copyright (C) 1995-1998 AOKI Atsushi
1998/01/05
http://www.sra.co.jp/people/aoki/SmalltalkGoodies/VisualWorks/Progress.st
http://www.sra.co.jp/people/aoki/SmalltalkGoodies/VisualWorks/Progress.txt


Summary:

So called "Progress Bar" goodies.  If you want to show 
the condition of progressing, simply you put it in a 
BlockContext and ask to show it.  Progress receives 
messages or normalized values from a BlockContext 
and show it on a gauge.


Installing:

FileIn this goodies and makes a class "Progress" in a 
category "Goodies-Progress". 

This source adds no change to existing classes or methods.
It completes within self.

When you want to restore your image, please remove this class 
"Progress" from your system, simply.


how to use:

Make an instance of Progress and send it a message "do:" to it.
Argument of this message is a BlockContext that you want to 
show progressing.  An instance of Progress can understand 
"message:" and "value:", you can tell him the condition of 
progressing as a normalized value or message.

Progress new 
	do: [:progress | 
		(0 to: 1 by: 0.01) do: [:n | 
			progress message: n printString. 
			progress value: n]].

If you want to add a stop button, you can do below, 

Progress new 
	doWithStopButton: [:progress | 
		(0 to: 1 by: 0.01) do: [:n | 
			progress message: n printString. 
			progress value: n.
			progress stopButtonPressed ifTrue: [progress close]]].


##########################################################

青木さんの
http://www.sra.co.jp/people/aoki/SmalltalkGoodies/VisualWorks/Progress.st
を Squeak 用にいじったものです。
ドキュメントは
http://www.sra.co.jp/people/aoki/SmalltalkGoodies/VisualWorks/Progress.txt
を参照してください。

----------------------------------------------------------
西原聡士 (NISHIHARA Satoshi)
e-mail: mailto:nishis@zephyr.dti.ne.jp
URL:    http://www.zephyr.dti.ne.jp/~nishis/
----------------------------------------------------------