XPalert()
 The Alert function for this section
------------------------------------------------------------------------------

   Function:   XPalert()

               This is a function similar to the standard Alert() from
               Clipper, except that it accepts more colors to be used
               (by use of XPdisplay()), it supports Mouse, more options
               and has shadows. In other words, it is a good replacement
               to Alert(), and is used in numerous situations in my programs.

               The ~ characters can be used to toggle between Bold
               and Normal for Color Attribute.

   Syntax:     XPalert(cTitle,cText,aChoice,nDefault) --> nChoice

   Arguments:  cTitle is the title to display.
               cText is the Text to display. it is centered in the box. Use
               the ; delimitor for more lines. aChoice is an Array of choices
               and defaults to {"~O~k"} (That is: Ok). nDefault is the
               default choice and defaults to 1.

   Returns:    the choice selected or 0 on Escape.

   Usage:      See XPask() for a nice usage of the function.