I solved the problem. The code below works fine except for the active form. In the form frmtimer which launches this procedure, I inserted a THISFORM.Activate before calling this procedure. Since this becomes the active form and I don't want it released, everything works the way I want it to.
Jeff Jeff Johnson [EMAIL PROTECTED] 623-582-0323 Fax 623-869-0675 -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Jeff Johnson Sent: Tuesday, January 16, 2007 10:27 AM To: [EMAIL PROTECTED] Subject: Releasing Multiple Windows - But Not All I am trying to close all windows except two and am not having much luck. The following code releases all of the windows except the two I want to leave open and the _screen.activeform. I even tried releasing the _screen.activeform first, but it still leaves it open. I also tried ACTIVATE SCREEN and _SCREEN.Show(). Likewise, I tried frmtimer.activate making it the active form. I can't seem to make the active form release. LnForms = _SCREEN.FormCount DO WHILE lnForms > 0 IF !(UPPER(_SCREEN.Forms(lnForms).name) $ 'CAPPTOOLBARBASE~FRMTIMER') llSuccess = _SCREEN.Forms(lnForms).QueryUnload() IF llSuccess _SCREEN.Forms(lnForms).Release() ENDIF ENDIF lnForms = lnForms - 1 ENDDO Any ideas? Jeff Jeff Johnson [EMAIL PROTECTED] 623-582-0323 Fax 623-869-0675 -- No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.1.410 / Virus Database: 268.16.12/630 - Release Date: 1/15/2007 --- StripMime Report -- processed MIME parts --- multipart/signed text/plain (text body -- kept) application/x-pkcs7-signature --- [excessive quoting removed by server] _______________________________________________ Post Messages to: [email protected] Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
