Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Display status of a long process?
Message
 
To
07/01/1997 11:18:42
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00016435
Message ID:
00016659
Views:
34
>I wrote a test form, there were one message label control and one command
>button on the form. when the command button clicked I executed next
>statements:
> lnCount = 0
> SELECT 1
> SCAN ALL
> SCATTER MEMVAR
> SELECT 2
> APPEND BLANK
> GATHER MEMVAR
> SELECT 1
> lnCount = lnCount + 1
> IF lnCount > 50
> lnCount = 1
> ENDIF
> THISFORM.lbl_Message.Caption = REPLICATE(">",lnCount)
> ENDSCAN
>Those code works fine, But I try to use a timer control to do this kind of
>things.
>So I add an timer control on my form, and I refresh message label caption
>in the timer event;
>and change the command button clicked code to :
> Start the timer first then
> SELECT 1
> SCAN ALL
> SCATTER MEMVAR
> SELECT 2
> APPEND BLANK
> GATHER MEMVAR
> SELECT 1
> ENDSCAN
> Stop the timer last.
>I found the timer event not fired until the SCAN LOOP command executed,
>what's wrong ? Is there any one have a good idea or any 3rd-party .OCX can
>do this kind of things ? Please give me some help, I really need that !
>Thanks a lot !
>Catherina of AS SOTA Co.
>
>>
>> >I want to display a flow scroll bar
>> and process percentage when I execute a
>> >long time process, ex. SELECT, PACK command. Is there any one have a
>good
>> >idea?
>> >
>> >Catherina of AS SOTA Co.
>>
>> For your selects, you can always set talk on prior to issuing your select
>
>> statement which will activate Foxpro's default thermometer. As for
>> Packing, I hope somebody offers a good suggestion, because I, too would
>> like to hear ideas!
>>
>> Good Luck,
>>
>> John Adams
>>

In some cases where timers won't fire we use DOEVENTS VFP 5.0 only, sadly missing from 3.0
Glenn
Previous
Reply
Map
View

Click here to load this message in the networking platform