delphi Edit有一个GetTextLen()方法可以返回输入的字符数

TEdit有一个GetTextLen()方法可以返回输入的字符数：

if Edit1.GetTextLen < 5 then

begin

  ShowMessage('please ensure that etc.');

end else

begin

  // use Edit1.Text as needed...

end;