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
>
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only