PRB: Error Message with BROWSE and SET FILTER Commands in Form (156733)


The information in this article applies to:

  • Microsoft Visual FoxPro for Windows 5.0
  • Microsoft Visual FoxPro for Windows 6.0
This article was previously published under Q156733

SYMPTOMS

When using a SET FILTER or BROWSE FOR commands to filter and display records in a form, the following error may appear:
"Object is not contained in a form."
The Debug window normally points to the BROWSE command as the line causing the error condition.

WORKAROUND

Use the following syntax to browse the desired records in the example created in the Steps to Reproduce Behavior section of this article: 
   x='"' + ALLTRIM(ThisForm.Text2.Value) + '"'
   SET FILTER TO &x $ Test.cfield1
   BROWSE

- or- 

   x='"' + ALLTRIM(ThisForm.Text2.Value) + '"'
   BROWSE FOR &x $ Test.cfield1
When you define the variable x in this example, a pair of single quotation mark characters (') enclose a double quotation mark character (").

STATUS

This behavior is by design.

MORE INFORMATION

Sometimes the SET FILTER and the BROWSE FOR commands encounter difficulty resolving object references. Therefore, you need to create a memory variable to hold the object reference as a string. Then use macro substitution to place the memory variable in the command.

Steps to Reproduce Behavior

  1. Create a table called test and add four records with the following commands: 
       CREATE TABLE test (cfield1 c(10))
   INSERT INTO test (cfield1) VALUES ("a")
   INSERT INTO test (cfield1) VALUES ("a")
   INSERT INTO test (cfield1) VALUES ("b")
   INSERT INTO test (cfield1) VALUES ("b")
  2. Create a form called test.
  3. Add Test.dbf to the Data Environment of the form.
  4. Drag cfield1 to the form creating a Text field, and close the Data Environment window.
  5. Add another Text box, Text2, to the form. This control should have no ControlSource.
  6. In the LostFocus event of Text2, add the following code: 
       SET FILTER TO ALLTRIM(Thisform.Text2.Value) $ Test.cfield1
   BROWSE
    You could also use the following line of code: 
       BROWSE FOR ALLTRIM(ThisForm.Text2.Value) $ Test.cfield1
  7. Run the form, enter the letter b in the Text2 field, and press the TAB key to trigger the LostFocus event. Note that the error "Object is not contained in a form" appears.
Modification Type:MajorLast Reviewed:10/15/2003
Keywords:KB156733
©2003 Microsoft Corporation. All rights reserved.