Window()

         Shows a window with optional tittle and shadow

    Syntax:

         Window( nY1, nX1, nY2, nX2, [cTittle], cBox, lShadow, ;
                  [cColor] ) -> Nil

         nY1     : Upper left Y coordinate
         nX1     : Upper left X coordinate
         nY2     : Lower right Y coordinate
         nX2     : Lower right X coordinate
         cTittle : The tittle, optional
         cBox    : The box type
         lShadow : A logic indicating if you want shadow
         cColor  : The color, optional

    Description:

         Draws a window in the given coordinates with the specified tittle
         or without tittle if cTittle is Nil and shaped or no depending on
         lShadow.
         The color of window is cColor or the active color is cColor is
         Nil.

    Return:

         Nothing.

    Example:

         Window ( 10, 15, 20, 25, "My Tittle", "+-+|+-+| ", .T., "GR+/B" )