[dec]

Hola,

Bueno. No conocía el método "GetTextLen()", pero, en todo caso, y, por aclarar, la función "Length()" que nos interesa aquí recibe como parámetro una cadena, y retorna el número de caracteres que la componen. De modo que el asunto podría quedar tal que así (en Delphi):

Código Delphi [-]
var
  len: integer;
begin
  len := Length(Edit1.Text);
  {...}
end;