Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Closing Form
Message
From
29/11/2003 02:39:52
 
 
To
29/11/2003 02:03:52
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Miscellaneous
Thread ID:
00854391
Message ID:
00854393
Views:
20
Hi,
To close all forms
lnFormCount = _SCREEN.FORMCOUNT
FOR I = 1 TO lnFormCount
  IF TYPE("_SCREEN.FORMS(I).BASECLASS") = "C
    _SCREEN.FORMS[I].RELEASE()
  ENDIF
NEXT
But, you may need to customize it abit to suite your need.

HTH
I am not the most powerful man in this world.
I am not the worst man in this world either.
I just as same as all of you.
I still need to learn from my mistakes...
Previous
Reply
Map
View

Click here to load this message in the networking platform