>>Is there a command that enables a DO... WHILE loop to allow other windows processing
>>to continue?
>>
>>Every time I run a certain .prg the network comes to a screeching halt.
>>
>>Thanks in advance
>
>Place DOEVENTS within the loop.
>
>-Mike
I tested this approach with the following results:
***********************************
* this program ran up to nCount = 4
***********************************
nCount = 1
nSeconds = SECONDS()
DO WHILE nCount < 100000 AND SECONDS() < nSeconds + 1
* IF MOD(nCount,1000) = 0
DOEVENTS
* ENDIF
@ 05,02 say nCount
nCount = nCount + 1
ENDDO
***********************************
* this program ran up to nCount = 405
***********************************
nCount = 1
nSeconds = SECONDS()
DO WHILE nCount < 100000 AND SECONDS() < nSeconds + 1
IF MOD(nCount,1000) = 0
DOEVENTS
ENDIF
@ 05,02 say nCount
nCount = nCount + 1
ENDDO
This will help, but I'll only issue a DOEVENTS command every 500 or 1000th
pass through the loop.
Thanks
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