Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to KEEP reading events?
Message
De
12/12/2003 16:23:50
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00858174
Message ID:
00858787
Vues:
28
>>This is a SWAG, but maybe you could experiment with DOEVENTS, since you're working with Outlook and not just VFP.
>
>I did get this working. I did the following:
>
>
>...
>
>loSysTray = createobject("mySysTray")
>loSysTray.Tag = "Run"
>
>do while loSysTray.Tag == "Run"
>   read events
>enddo
>
>...
>
>* Proc Of Class Definition for mySysTray
>   PROCEDURE icondblclickevent
>      this.RemoveIconFromSysTray
>      this.Tag = "End"
>      CLEAR EVENTS
>   ENDPROC
>
>
>It works but I'm still not sure why the read events doesn't continue to read the systray events. According to Fox Help, read events is supposed to read events until a clear events is issued. My code never issued the clear events. So the mystery remains but the program works.
>
>BTW, I wasn't quite sure where I'd use the DoEvents ... had the above not worked, I would've at least started toying with that thought. <g>

IIRC I'd have put it exactly where you put CLEAR EVENTS, right after the cleanup code you had in the other version.
Regards. Al

"Violence is the last refuge of the incompetent." -- Isaac Asimov
"Never let your sense of morals prevent you from doing what is right." -- Isaac Asimov

Neither a despot, nor a doormat, be

Every app wants to be a database app when it grows up
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform