>>>Hi Gang!
>>>
>>>In one of our apps, there is some code to do an
>>>
>>>INDEX ON
>>>
>>>to recreate the tags in the free table.
>>>
>>>
>>>The output is displayed on the form, but looks very uncontrolled... writing over text and objects.
>>>
>>>
>>>I have added an editbox to show output before we reach this point in the program.
>>>
>>>Any way to redirect the output of INDEX ON to go into the editbox, instead of the form itself?
>>>
>>>Thanks!
>>
>>the first raw idea ...
>>

>>PUBLIC g_LastRefresh
>>g_LastRefresh = CAST(NULL AS N)
>>
>>CREATE CURSOR testindex (f1 INT)
>>FOR k=1 TO 1000000
>>	APPEND BLANK
>>NEXT
>>GO TOP
>>
>>INDEX on f1 FOR progressIndex() TAG tag1
>>
>>* DISABLE OUTPUT
>>g_LastRefresh = -1
>>
>>PROCEDURE progressIndex
>>        IF m.g_LastRefresh<0 OR EMPTY(RECCOUNT())
>>            RETURN
>>        ENDIF
>>	IF m.g_LastRefresh<ROUND(RECNO()/RECCOUNT(),2)
>>		WAIT WINDOWS ROUND(RECNO()/RECCOUNT(),2) NOWAIT
>>	ENDIF
>>	g_LastRefresh=ROUND(RECNO()/RECCOUNT(),2)
>>ENDPROC
>>
>>

>
>Thanks!

remember, you lose VFP optimization!