Progress Bar
Version 2.0
(c) Copyright Derek Erb 1994
CompuServe 100126,2651

This is an example of a possible solution to the idea of a graphic progress
bar which can be called by your methods while running.

All of the code is contained in the progress bar box.  All you need to do
is copy this box to your form.

You can change the size of the box, and its internal boxes, as well as
the font types, sizes, colours etc as well as the colour of the progress
bar.  It should still work...

To see how the system works check out the code in the OK pushButton()
method.  The bar needs to be initialised with the maximum value by calling
ProgBarBox.Init(x).  Then within your loop(s) you modify the meter's text
and the percentage complete bar/text by calling
ProgBarBox.Fill("MeterText", number(CurrentValue)).  At the end of your
loop you call ProgBarBox.End() to reset the mouse cursor and make the
meter disappear.

I hope that you may find this idea useful however I accept no responsibility
whatsoever as to any eventual errors or damage.  It is available for
public distribution.  You may copy and reuse it as often as you like.
However I would get upset if you were to resell this function either on 
its own or as part of a programmer's tool library.

If you have any comments or suggestions please drop me a message on
CompuServe.

Good luck!

Derek Charles Erb
Paris - FRANCE

P.S.  I would greatly appreciate it if someone could test this on a SVGA
system and tell me if it works or not!