PRB: Mouse Cursor Disappears in a DO WHILE Loop

Last reviewed: April 18, 1995
Article ID: Q112399
The information in this article applies to:
  • Microsoft FoxPro for MS-DOS, versions 2.0, 2.5, 2.5a, and 2.5b

SYMPTOMS

When FoxPro for MS-DOS executes the INKEY() function with the "M" parameter, the mouse cursor remains visible. However, when FoxPro for MS-DOS executes a DO WHILE loop, the mouse cursor disappears.

STATUS

In FoxPro for MS-DOS, "no mouse" is the indicator that the mouse is busy when running user code. This behavior is by design.

MORE INFORMATION

The following code demonstrates the issue. In FoxPro for MS-DOS, create and execute this program:

   CLEAR
   SET MOUSE ON
   x = SECONDS()
   @10, 0 SAY "Start"
   =INKEY(2,"M")            && Mouse cursor remains visible in ;
                               FoxPro for MS-DOS
   @11, 0 SAY "End"

   DO WHILE SECONDS()-x<=5  && Mouse cursor disappears in ;
                               FoxPro for MS-DOS
   ENDDO

You will see that the mouse cursor remains visible between the "Start" and "End" points. The "M" parameter of the INKEY() function is required for this visual cue. When the code reaches the DO WHILE loop, the mouse cursor disappears.


Additional reference words: FoxDos 2.00 2.50 2.50a 2.50b
KBCategory: kbprg kbprb
KBSubcategory:


THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Last reviewed: April 18, 1995
© 1998 Microsoft Corporation. All rights reserved. Terms of Use.