>I have tried to add a progressbar to a screen and can't figure out how to make it work (this IS embarrassing). All I'm trying to do is show the progress while scanning through a fairly large table. I've given up. Please help.
>
>Thanks,
>Larry Morelli

*Starting scan
with thisform.oPbar
 .Max = reccount('HugeTable')
 .Value = 0
endwith
scan
*....
 if recno()%1000 = 0 && No need to update per record
   with thisform.oPbar
    .Value = min(.Value + 1000,.Max)
   endwith
 endif
endscan

Cetin