XPchdir()
   Change the default DOS directory
------------------------------------------------------------------------------

   Function:   XPchdir()

               XPchdir() is used to Change the default DOS
               directory.

   Syntax:     XPchdir(cDir) --> nError

   Arguments:  <cDir> is the directory to change to. Any valid
               DOS directory allowed here, including Dots etc..

   Returns:    A Numeric value, 0 indicates no error, any other
               value indicates an error, the error code is the
               number returned by DOS.

   Usage:      code := XPchdir('\EXPAND')

               Or, don't check the return code:

               XPchdir('\CLIPPER5')