WHEREX                 Return Cursor Column Position                 pp 162

 Syntax:  WhereX ;

 Type:    Integer

 Form:    Function

 Purpose: Return the current column coordinate of the cursor.


 ----------------------------------------------------------------------------


 Usage:
       VAR
          RowLoc : Integer ;  { Holds Y location }
          ColLoc : Integer ;  { Holds X location }

       BEGIN
          RowLoc := WhereY ;  { Get Y location   }
          ColLoc := WhereX ;  { Get X location   }
       END.