A refreshed grid does not display any data when a cursor is updated at run time in Visual FoxPro

Steps to reproduce the behavior

1. Create a form, and then add the CUSTOMER.DBF table (in the \VFP\SAMPLES\DATA directory) to the Data Environment.
2. Place the following code in the Load event of the form:

   CREATE CURSOR Compdisp (company c(40),city c(15),country c(15))
   

3. Place the following code in the Destroy event of the form:

      SELECT Compdisp
      USE
   							

4. Create a grid on the form, and give the grid the following property settings:

      ColumnCount=3
      RecordSourceType=Alias
      RecordSource=Compdisp
   							

5. Add a text box to the form.
6. Add a command button with the following code in its Click event:

      SELECT company,city,country;
         FROM customer;
         WHERE customer.country=thisform.text1.value;
         INTO CURSOR Compdisp
      THISFORM.GRID1.REFRESH
   							

7. Run the Form. Type France in the text box, and then click the command button.

   ThisForm.Grid1.RecordSource =ThisForm.Grid1.RecordSource