Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Clear events
Message
De
20/07/2006 02:21:24
 
 
À
19/07/2006 17:43:41
Metin Emre
Ozcom Bilgisayar Ltd.
Istanbul, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Divers
Thread ID:
01137850
Message ID:
01137931
Vues:
10
>Hi All,
>if I make form as "as top level form" or I make form as "modeless", wait window command will run. But in that case doesn't run...
>
>
>o=Createobject("myform")
>o.Show
>
>Read Event
>
>Wait Window "This wait won't run"
>
>Return
>
>
>
>Define Class myform As Form
>	WindowType=1
>	Add Object btn As mycommand
>Enddefine
>
>Define Class mycommand As CommandButton
>	Height=30
>	Width=100
>	Caption="Click Me"
>	Procedure Click
>	Thisform.Release
>	Clear Events
>	Endproc
>Enddefine
>
With Modal,
Show() wait the Form's Unload return,
and then CLEAR EVENTS is ignored.

At this point the READ EVENTS put an endless wait point.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform