Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Has Read Events been issued?
Message
From
14/12/2000 21:27:34
 
 
To
14/12/2000 04:53:45
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00452780
Message ID:
00453733
Views:
30
>>>>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 && Here timer seems to poll its events

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
EMail: EdR@edrauh.com
"See, the sun is going down..."
"No, the horizon is moving up!"
- Firesign Theater


NT and Win2K FAQ .. cWashington WSH/ADSI/WMI site
MS WSH site ........... WSH FAQ Site
Wrox Press .............. Win32 Scripting Journal
eSolutions Services, LLC

The Surgeon General has determined that prolonged exposure to the Windows Script Host may be addictive to laboratory mice and codemonkeys
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform