Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Determine if a form is active
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00858980
Message ID:
00858991
Views:
20
Small correction
oCurrentForm = _Screen.Forms(i).Name
* should be
oCurrentForm = _Screen.Forms(i)
>Hi Vince!
>
>You can store referrence to the form like this:
>
>Local lcThisFormName
>lcThisFormName = ThisForm.Name
>public (lcThisFormName)
>Store ThisForm to (lcThisFormName)
>
>But you can also enumetare all opened forms like this:
>
>For i= count_all To 1 Step -1
>	oCurrentForm = _Screen.Forms(i).Name
>	If (FormShouldBeReleased)
>		oCurrentForm.Release
>	endif
>	....
>EndFor
>
>
>>Hi all
>>I need to release of series of forms from a main menu. However, not all forms may have been opened. Can't issue a clear all because the current form needs to remain open.
>>
>>question: How do I determine if a form is open short of creating a variable that is set when the form is opened and checking that variable prior to form-id.release.
>>
>>thanks in advance, vince
--sb--
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform