-----------------------------------------------------------------
function GetTextLen: Integer;
Возвращает длину текста в соответствующем управляющем эле- менте редактирования.