NAME: TextHeight

     USE: Function to return the height of a text string in pixels.
          The returns value is of type word;

     DEPENDENCY:  Must first be in graphics mode.  The unit Graph
                  must also be placed in the uses section.

     SYNTAX: TextHeight(TestString : String);