[<<Previous Entry]
[^^Up^^]
[Next Entry>>]
[Menu]
[About The Guide]
FUNCTION PROGON()
Short:
------
PROGON() Initialize and display a progress bar box
Returns:
--------
Nil
Syntax:
-------
PROGON([cMessage])
Description:
------------
Places a progress box on the screen for use by
PROGDISP()
[cMessage] is an optional box title
Examples:
---------
//--------- this just shows progress from 1 - 1000
initsup()
ProgOn("Test")
for i = 1 to 1000
ProgDisp(i,1000,{||alltrim(str(i))+" of 1000"} )
next
ProgOff()
//-------- this show indexing progress
use Customer
ProgOn("Index")
dbcreateindex("Eraseme","(LNAME)", ;
{||ProgDisp( recno(),recc() ),LNAME},.f.)
ProgOff()
Source:
-------
S_PROG.PRG
This page created by ng2html v1.05, the Norton guide to HTML conversion utility.
Written by Dave Pearson