Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Clear events
Message
 
To
19/07/2006 17:43:41
Metin Emre
Ozcom Bilgisayar Ltd.
Istanbul, Turkey
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
01137850
Message ID:
01137928
Views:
11
Hi Metin,

Because MODAL window stop at Calling Show() method
If you call MODAL window, don't use READ EVENTS after caling .Show().
o=Createobject("myform")
o.Show

*Read Event && for non modal windows

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
MartinJ

>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
>
"Navision is evil that needs to be erazed... to the ground"

Jabber: gorila@dione.zcu.cz
Jabber? Jabbim
Previous
Reply
Map
View

Click here to load this message in the networking platform