LOCAL loProgress loProgress = CREATEOBJECT("ProgressIndicator") * PARAMS: caption, min, max, initial value, undetermined, cancel button loProgress.setup("Selecting Data...", 1, 1, 0, .T., .F.) loProgress.show() =INKEY(10,"H") && This works, but 'real' code does not RELEASE loProgressI have about 50 lines of code (2 SCANs and a SELECT ... UNION) that takes about 10 seconds to execute. I removed the
=INKEY(10,"H")
and placed the RELEASE after all the data munching stuff, and just before the REPORT FORM ....., hoping to hypnotize my users with a classy looking progress bar.