Knowledge Base

FIX: "File Is Not Open" Error Message When You Save a Form May Cause Infinite Loop

Article ID: 314651

Article Last Modified on 3/4/2002

APPLIES TO

Microsoft Visual FoxPro 7.0 Professional Edition

This article was previously published under Q314651

SYMPTOMS

If the following error message appears when you try to save a form that has a breakpoint set, Visual FoxPro may go into a infinite loop:

"File is not open."

RESOLUTION

To resolve this problem, obtain the latest service pack for Visual FoxPro for Windows 7.0. For additional information, click the following article number to view the article in the Microsoft Knowledge Base:

316964 How to Obtain the Latest Visual FoxPro for Windows 7.0 Service Pack

STATUS

Microsoft has confirmed that this is a problem in Microsoft Visual FoxPro for Windows 7.0. This problem was first corrected in Visual FoxPro for Windows 7.0 Service Pack 1.

MORE INFORMATION

Steps to Reproduce Behavior

Save the following code in a program (.prg) file and then run the program:

IF TYPE('gltest') = "U"
   PUBLIC glTest
   gltest = .t.
   CLEAR DEBUG
   * The following line opens the Breakpoint dialog box,
   * sets a breakpoint, and closes the dialog box. 
   KEYBOARD '{ctrl+b}click{enter}{enter}'
   DOEVENTS 
ENDIF 

SET RESOURCE OFF 
LOCAL aobj[1], xx
DELETE FILE testxx.sc?

CREATE FORM testxx NOWAIT
=ASELOBJ(aobj,1)
xx = aobj[1]
xx.caption = xx.caption
KEYBOARD 'Y' CLEAR
RELEASE WINDOW 'Form Designer - testxx.scx'
MODIFY FORM testxx NOWAIT METHOD load 

* Type a comment.
KEYBOARD '*'
DOEVENTS 
* Select designer and close it.
ACTIVATE WINDOW 'form designer - testxx.scx'
KEYBOARD '{ctrl+w}'
RETURN

Run the program again. Click OK to close the File is not open message box.
In the Properties dialog box, click the Methods tab and then locate the Load event.
Double-click the Load event.

Additional query words: kbVFP700sp1fix

Keywords: kbbug kbfix kbcodesnippet KB314651

Microsoft KB Archive/314651

Contents