Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Clear events
Message
De
19/07/2006 17:43:41
Metin Emre
Ozcom Bilgisayar Ltd.
Istanbul, Turquie
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Clear events
Divers
Thread ID:
01137850
Message ID:
01137850
Vues:
71
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
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform