>>>>Is there any function in VFP5 that will enable me to determine if a READ EVENTS has been issued or not.
>>>>
>>>>Thanks
>>>>
>>>>Mace
>>>
>>>Mace,
>>>I'm away from my development box at the moment. For read there was rdlevel() and it might also be working with read events.
>>>Cetin
>>
>>Cetin,
>>
>>Am I right in thinking a timer event will not fire until read events has been issued?
>>
>>Mace
>
>Mace,
>I made a quick test. Until 'read events' timer seems not to be fired but polls its events and as 'read events' is encountered do all at once. Here is the code I used :
>
oForm=CreateObject('Form')
>oForm.addobject('myTimer','myTimer')
>start=seconds()
>do while seconds()-start < 10
If start is set near the end of a day (23:59:56 for example) it'll never run out. Use DATETIME() rather than SECONDS() to avoid this problem.
>enddo
>oForm.Show
>read events
>
>define class myTimer as Timer
> Interval = 2000
> procedure timer
> _screen.print('Timer fired at '+transform(seconds()))
> endproc
>enddefine
Cetin