Click above to get retro games delivered to your door ever month!

 WProgressDialog        Progress dialog class
 ----------------------------------------------------------------------------
 WProgressDialog
 Progress dialog class
 ----------------------------------------------------------------------------
 
 Properties
 Cancelled      A logical indicating that the activity in progress should stop
 Current        The numeric value of the counter
 DoneColor      The RGB() value for the "done" part
 Max            The maximum value of the counter
 Min            The minimum value of the counter
 TextDoneColor  The RGB() value for the "done" part of the percentage
 TextToDoColor  The RGB() value for the uncompleted part of the percentage
 ToDoColor      The RGB() value for the uncompleted part
 WndStyle       The dialog's usual style (a combination of WS_* values)
 
 Methods
 WProgressDialog:Cancel()      Signal that an on-going activity should stop
 WProgressDialog:Init()        Construct a progress dialog object
 
 Inherits From
 WDialog
 
 Inherited By
 Nothing.
 
 Description
 This is the class for a progress dialog containing a push
 button and a progress bar (meter) control (a two-coloured
 rectangle whose "done" area corresponds to the value of a
 counter, optionally displaying a string or a percentage).
 
 Most of the above properties are the ones of the progress bar
 control contained in the dialog.
 
 Because Clip-4-Win uses "smart dialogs with dumb controls",
 few properties and few methods are required in this class or
 most sub-classes.  (The WDialog class provides the logic,
 rather than spreading it across the controls.)
 
 Example
 // From SOURCE\OO\PBAR.PRG:
 METHOD ResPBar2()                                                  ;
        INLINE ::oPD := WProgressDialog{self, "progbar2"},           ;
               ; // oPD:Text will be set from the resource, but if
               ; // you want to change it here's how:
               ::oPD:Text := "Copying Files...",                     ;
               ::lFName := .t.,                                      ;
               ; // it's this easy to "hook into" a control
               ::oPD:Add( ::oFName := WCenterText{::oPD, IDD_FNAME}),;
               SetTimer(::hWnd, 1, 250)
 
 See Also  (press Enter)