FIX: Clicking from ListBox on Form to Command Window Gives GPF

MORE INFORMATION

Steps to Reproduce Behavior

1. Copy and paste the following code into a program named Test.prg in Microsoft Visual FoxPro version 5.0 running on Windows 95:

      **************************************************
      *-- Program: test.prg
      *-- Code to illustrate page fault in
      *-- Visual FoxPro for Windows 5.0
   
      PUBLIC oForm
      oForm = CREATEOBJECT("testform")
      oForm.Show
   
      **************************************************
      *-- Form:         testform
      *-- ParentClass:  form
      *-- BaseClass:    form
      *
      DEFINE CLASS testform AS FORM
         Top = 0
         Left = 0
         DoCreate = .T.
         Caption = "Testform Form"
         Name = "testform"
   
         ADD OBJECT edit1 AS editbox WITH ;
            Height = 217, ;
            Left = 12, ;
            Top = 12, ;
            Width = 121, ;
            Name = "Edit1"
   
         PROCEDURE Click
            KEYBOARD REPLICATE("a"+CHR(13), 60 )
         ENDPROC
   
      ENDDEFINE
      *
      *-- EndDefine: testform
      **************************************************
   							

2. Run the program by issuing the following command in the Command window:

         DO TEST.PRG
   							

3. With the mouse, click four or five times in the gray area of the form.
4. Click in the Command window.