Click above to get retro games delivered to your door ever month!

   tp_inkey() - read a key and handle notifications

   nKey := tp_inkey([nTime])

   nTime       Number of seconds to wait.

   Returns     Same as Clipper INKEY() function.

   Reads a key from the keyboard, handling any notifications that occur
   while waiting for the key.  This is a replacement for the Clipper
   inkey() function.  nTime is the number of seconds (up to 1800) to
   wait for a keystroke.  If nTime is zero, waits indefinitely; if nTime
   is omitted, returns immediately.  Returns zero if no keystroke was
   available.

   [5.0] The header file tpkeybd.ch defines this function as a
   replacement for INKEY().

   Example:

       #include "tpkeybd.ch"

       ? "Press any key to exit..."
       do while inkey() == 0       // Translated to tp_inkey()
           ...stuff...
       enddo