Function TextWidth (S : String) : Word;
TextHeight returns the width (in pixels) of the string S in the current font and text-size.
None.
TextHeight