Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to get un-stuck from never ending QueryUnload loop
Message
 
 
To
01/03/2001 16:44:55
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00480846
Message ID:
00481221
Views:
15
Micheal,

Check my FAQ about releasing all forms.

>Hi Vlad,
>
>>
>>for i=1 to _Screen.FormCount
>>  if _Screen.forms[i].Name = 'MyChildFormName'
>>    _Screen.forms[i].Release
>>  endif
>>endfor
>>
>
>Just on the Forms array, after each form is released the forms array is resized. It would be better to iterate backwards through the array, or always release the first form in the array such as below
>
>
>FOR i = 1 to _Screen.FormCount
>  IF _Screen.forms[i].Name = 'MyChildFormName'
>    _Screen.forms[1].Release
>  ENDIF
>NEXT
>
>
>
>FOR i = _Screen.FormCount TO 1
>  IF _Screen.forms[i].Name = 'MyChildFormName'
>    _Screen.forms[1].Release
>  ENDIF
>NEXT
>
>
>Maybe even test the queryUnload event before attempting to release the form.
>
>Michael Henstock
>AWS
If it's not broken, fix it until it is.


My Blog
Previous
Reply
Map
View

Click here to load this message in the networking platform